1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 3a37ab27c..3662fd824 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -289,7 +289,7 @@ sub detect {
 
     if (c::kernel_version() =~ /^\Q2.6/) {
 	$modules_conf->get_probeall("usb-interface") and eval { modules::load('usbhid') };
-        if (cat_('/proc/bus/input/devices') =~ /^H: Handlers=mouse/) {
+        if (cat_('/proc/bus/input/devices') =~ /^H: Handlers=mouse/m) {
             if (is_xbox()) {
                 return fullname2mouse('Universal|Microsoft Xbox Controller S');
             }