summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-08-06 19:01:00 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-08-06 19:01:00 +0000
commit620b4743b45264f488e557d8a7e3160887f7f682 (patch)
treec9189f4add8fbd34d3e5a1a2a7f17d9d5c09e7c3 /perl-install
parenta15037c569838ee6f49282753dcd9074d48bbd67 (diff)
downloaddrakx-620b4743b45264f488e557d8a7e3160887f7f682.tar
drakx-620b4743b45264f488e557d8a7e3160887f7f682.tar.gz
drakx-620b4743b45264f488e557d8a7e3160887f7f682.tar.bz2
drakx-620b4743b45264f488e557d8a7e3160887f7f682.tar.xz
drakx-620b4743b45264f488e557d8a7e3160887f7f682.zip
nobody pass the second argument of
network::modem::modem_detect_backend() so let simplify it
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/modem.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index c90725081..8e6f445a7 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -66,9 +66,9 @@ sub pppConfig {
#- output:
#- $modem->{device} : device where the modem were detected
sub modem_detect_backend {
- my ($modem, $mouse) = @_;
- $mouse ||={};
- $mouse->{device} ||= readlink "/dev/mouse";
+ my $modem = @_;
+ my $mouse = {};
+ $mouse->{device} = readlink "/dev/mouse";
my $serdev = arch() =~ /ppc/ ? "macserial" : "serial";
eval { modules::load($serdev) };