(selectMouse): when selecting a usb mouse, call setup_thiskind with

at_least_one=1 (so that pci_class probe is used and so unknown serial_usb
recognised (cf ldetect))

1 files changed, 7 insertions, 5 deletions

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index e34187bad..2e4503851 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -273,11 +273,13 @@ sub selectMouse {
 		]) or return;
     }
     
-    any::setup_thiskind($o, 'usb', !$::expert, 0, $o->{pcmcia}) if $o->{mouse}{device} eq "usbmouse";
-    eval { 
-	devices::make("usbmouse");
-	modules::load($_) foreach qw(hid mousedev usbmouse);
-    } if $o->{mouse}{device} eq "usbmouse";
+    if ($o->{mouse}{device} eq "usbmouse") {
+	any::setup_thiskind($o, 'usb', !$::expert, 1, $o->{pcmcia});
+	eval { 
+	    devices::make("usbmouse");
+	    modules::load($_) foreach qw(hid mousedev usbmouse);
+	};
+    }
 
     $o->SUPER::selectMouse;
     1;