diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-04-07 14:43:04 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-04-07 14:43:04 +0000 |
| commit | 1800d14ff9ac6dd218d274b6b4e13e3e71baecc4 (patch) | |
| tree | 4a915815837bb688748bcefaaef31e1dce35fcac /perl-install/mouse.pm | |
| parent | fe2f11d05f38a658db90c75ce73dbe87bfb84a64 (diff) | |
| download | drakx-1800d14ff9ac6dd218d274b6b4e13e3e71baecc4.tar drakx-1800d14ff9ac6dd218d274b6b4e13e3e71baecc4.tar.gz drakx-1800d14ff9ac6dd218d274b6b4e13e3e71baecc4.tar.bz2 drakx-1800d14ff9ac6dd218d274b6b4e13e3e71baecc4.tar.xz drakx-1800d14ff9ac6dd218d274b6b4e13e3e71baecc4.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/mouse.pm')
| -rw-r--r-- | perl-install/mouse.pm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index a16c0b1d7..1239ae99f 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -101,9 +101,13 @@ sub write($;$) { sub mouseconfig { my ($t, $mouse, $wacom); - foreach (0..1) { #- probe only ttyS0 and ttyS1. - $t = detect_devices::probe_device("/dev/ttyS$_"); - if ($t->{CLASS} =~ /MOUSE/i) { + #- Whouah! probing all devices from ttyS0 to ttyS3 once a time! + detect_devices::probeSerialDevices(); + + #- check new probing methods keep everything used here intact! + foreach (0..3) { + $t = detect_devices::probeSerial("/dev/ttyS$_"); + if ($t->{CLASS} eq 'MOUSE') { $t->{MFG} ||= $t->{MANUFACTURER}; $mouse = name2mouse("Microsoft IntelliMouse (serial)") if $t->{MFG} eq 'MSH' && $t->{MODEL} eq '0001'; |