summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network')
-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) };