summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-04-11 16:56:56 +0000
committerFrancois Pons <fpons@mandriva.com>2001-04-11 16:56:56 +0000
commit47ec2240618eb00c4b0a06a7d74626e3db0de8fe (patch)
tree456f419e3b7966e842617b8f6db15e02d6ab3a23 /perl-install
parent89cbbb37830edcd6a79222036aba68aed51c2751 (diff)
downloaddrakx-47ec2240618eb00c4b0a06a7d74626e3db0de8fe.tar
drakx-47ec2240618eb00c4b0a06a7d74626e3db0de8fe.tar.gz
drakx-47ec2240618eb00c4b0a06a7d74626e3db0de8fe.tar.bz2
drakx-47ec2240618eb00c4b0a06a7d74626e3db0de8fe.tar.xz
drakx-47ec2240618eb00c4b0a06a7d74626e3db0de8fe.zip
fixed probe on kernel 2.4.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/printerdrake.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index 7c2752e29..a9af38b9d 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -18,8 +18,12 @@ sub auto_detect {
{
my $w = $in->wait_message(_("Test ports"), _("Detecting devices..."));
modules::get_alias("usb-interface") and eval { modules::load("printer"); sleep(2); };
- eval { modules::load_multi("parport_pc", "lp"); };
- eval { modules::load("parport_probe"); }; #- take care as not available on 2.4 kernel (silent error).
+ foreach (qw(parport_pc lp parport_probe parport)) {
+ eval { modules::unload($_); }; #- on kernel 2.4 parport has to be unloaded to probe again
+ }
+ foreach (qw(parport_pc lp parport_probe)) {
+ eval { modules::load($_); }; #- take care as not available on 2.4 kernel (silent error).
+ }
}
my $b = before_leaving { eval { modules::unload("parport_probe") } };
detect_devices::whatPrinter();