summaryrefslogtreecommitdiffstats
path: root/perl-install/mouse.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-11-10 12:35:02 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-11-10 12:35:02 +0000
commitda94715e3d4e07486df853675958fd522016810c (patch)
tree8edacac989817a4567c5affc93694aeb7ff65d54 /perl-install/mouse.pm
parente493243f413480eaab130284867a2fcb0f2b649d (diff)
downloaddrakx-da94715e3d4e07486df853675958fd522016810c.tar
drakx-da94715e3d4e07486df853675958fd522016810c.tar.gz
drakx-da94715e3d4e07486df853675958fd522016810c.tar.bz2
drakx-da94715e3d4e07486df853675958fd522016810c.tar.xz
drakx-da94715e3d4e07486df853675958fd522016810c.zip
no_comment
Diffstat (limited to 'perl-install/mouse.pm')
-rw-r--r--perl-install/mouse.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 6303d3b1a..9dd539623 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -12,6 +12,7 @@ use pci_probing::main;
use detect_devices;
use run_program;
use commands;
+use modules;
use log;
my @mouses_fields = qw(nbuttons device MOUSETYPE XMOUSETYPE FULLNAME);
@@ -91,7 +92,7 @@ sub detect() {
my %l;
eval { commands::modprobe("serial") };
@l{qw(FULLNAME nbuttons MOUSETYPE XMOUSETYPE device)} = split("\n", `mouseconfig --nointeractive 2>/dev/null`) and return \%l;
- eval { run_program::run("rmmod", "serial") };
+ modules::unload("serial");
if (my ($c) = pci_probing::main::probe("SERIAL_USB")) {
eval { modules::load($c->[1], 'usbmouse') };