diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/detect_devices.pm | 6 | ||||
| -rw-r--r-- | perl-install/modules.pm | 14 | ||||
| -rw-r--r-- | perl-install/mouse.pm | 2 |
3 files changed, 12 insertions, 10 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 8367c0bdd..de03702a9 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -256,8 +256,10 @@ sub probeUSB { if ($@) { $usb_interface = ''; } else { - modules::load("usbkbd"); - modules::load("keybdev"); + eval { + modules::load("usbkbd"); + modules::load("keybdev"); + }; } } else { $usb_interface = ''; diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 198bc118f..3a3ea2811 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -160,14 +160,14 @@ arch() =~ /^sparc/ ? ( [ 'cdrom', { arch() !~ /^sparc/ ? ( "sbpcd" => "SoundBlaster/Panasonic", -#- "aztcd" => "Aztech CD", -#- "gscd" => "Goldstar R420", -#- "isp16" => "ISP16/MAD16/Mozart", + "aztcd" => "Aztech CD", + "gscd" => "Goldstar R420", +#- "isp16" => "ISP16/MAD16/Mozart", #- removed for space #- "mcd" => "Mitsumi", #- removed for space -#- "mcdx" => "Mitsumi (alternate)", -#- "optcd" => "Optics Storage 8000", -#- "cm206" => "Phillips CM206/CM260", -#- "sjcd" => "Sanyo", +#- "mcdx" => "Mitsumi (alternate)", #- removed for space + "optcd" => "Optics Storage 8000", + "cm206" => "Phillips CM206/CM260", + "sjcd" => "Sanyo", "cdu31a" => "Sony CDU-31A", "sonycd535" => "Sony CDU-5xx", ) : (), diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 8f8607990..f939e3fe0 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -144,7 +144,7 @@ sub detect() { modules::load("usbmouse"); modules::load("mousedev"); }; - sleep(1); + sleep(2); if (!$@ && detect_devices::tryOpen("usbmouse")) { $wacom or modules::unload("serial"); return name2mouse("USB Mouse"), $wacom; |