diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-19 18:08:18 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-19 18:08:18 +0000 |
commit | 4f816ef325f21f8e05fa305afdcc9732a5e15ccd (patch) | |
tree | 144de96d33e934fb54fba370ac22e4e53f6aa4cf /perl-install | |
parent | bccac3d7c588e70adf140fc289a047587231b093 (diff) | |
download | drakx-4f816ef325f21f8e05fa305afdcc9732a5e15ccd.tar drakx-4f816ef325f21f8e05fa305afdcc9732a5e15ccd.tar.gz drakx-4f816ef325f21f8e05fa305afdcc9732a5e15ccd.tar.bz2 drakx-4f816ef325f21f8e05fa305afdcc9732a5e15ccd.tar.xz drakx-4f816ef325f21f8e05fa305afdcc9732a5e15ccd.zip |
(getSerialModem) fix device field
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/detect_devices.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index d02c5dd78..c426b147c 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -404,12 +404,11 @@ sub getSerialModem { next if $mouse->{device} =~ /$port/; my $device = "/dev/$port"; next unless -e $device && hasModem($device); + $serialprobe{$device}->{device} = $device; push @modems, $serialprobe{$device}; } my @devs = pcmcia_probe(); foreach my $modem (@modems) { - $modem->{device} = $modem->{DEVICE}; - delete $modem->{DEVICE}; #- add an alias for macserial on PPC modules::add_alias('serial', $serdev) if arch() =~ /ppc/ && $modem->{device}; foreach (@devs) { $_->{type} =~ /serial/ and $modem->{device} = $_->{device} } |