summaryrefslogtreecommitdiffstats
path: root/perl-install/network/adsl.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-10-17 14:24:27 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-10-17 14:24:27 +0000
commitbfc6a7a21c571a02ae19e72396b6e3ca4482805e (patch)
tree82272051c97b09670cd5199c096091b3283822b7 /perl-install/network/adsl.pm
parent49c158a87fa1a6316243e9c94186a1d7dfaee0ca (diff)
downloaddrakx-backup-do-not-use-bfc6a7a21c571a02ae19e72396b6e3ca4482805e.tar
drakx-backup-do-not-use-bfc6a7a21c571a02ae19e72396b6e3ca4482805e.tar.gz
drakx-backup-do-not-use-bfc6a7a21c571a02ae19e72396b6e3ca4482805e.tar.bz2
drakx-backup-do-not-use-bfc6a7a21c571a02ae19e72396b6e3ca4482805e.tar.xz
drakx-backup-do-not-use-bfc6a7a21c571a02ae19e72396b6e3ca4482805e.zip
- simplify
- remove spurious module imports & requires - remove never used arg (this enable to simplify caller) - fix detection logic: do not mix old detected stuff with new one if one step back in drakconnect after plugging some network devices in
Diffstat (limited to 'perl-install/network/adsl.pm')
-rw-r--r--perl-install/network/adsl.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index a6bc82009..bb88937d9 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -99,8 +99,8 @@ sub adsl_ask_info {
ask_info2($adsl, $netc);
}
-sub adsl_detect {
- my ($adsl) = @_;
+sub adsl_detect() {
+ my ($adsl) = {};
require detect_devices;
$adsl->{speedtouch} = detect_devices::getSpeedtouch();
$adsl->{sagem} = detect_devices::getSagem();