From 47ec2240618eb00c4b0a06a7d74626e3db0de8fe Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 11 Apr 2001 16:56:56 +0000 Subject: fixed probe on kernel 2.4. --- perl-install/printerdrake.pm | 8 ++++++-- 1 file 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(); -- cgit v1.2.1