diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-04 22:25:15 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-04 22:25:15 +0000 |
commit | 9602001c7823079a8e8ca0e737a8fe2f6c0db0d2 (patch) | |
tree | 6a4a4b5bb040972c82f8f23a7f154b7631d95591 /perl-install/printerdrake.pm | |
parent | b5b714420602230508f199cb392d21c4410a4f1d (diff) | |
download | drakx-backup-do-not-use-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar drakx-backup-do-not-use-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.gz drakx-backup-do-not-use-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.bz2 drakx-backup-do-not-use-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.xz drakx-backup-do-not-use-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.zip |
adapt to new modules.pm
Diffstat (limited to 'perl-install/printerdrake.pm')
-rw-r--r-- | perl-install/printerdrake.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 82b7c11df..b5a15c178 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -143,13 +143,9 @@ sub auto_detect { my ($in) = @_; { my $w = $in->wait_message(_("Test ports"), _("Detecting devices...")); - modules::get_alias("usb-interface") and eval { modules::load("printer"); sleep(2); }; - foreach (qw(lp parport_pc 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). - } + modules::get_alias("usb-interface") and eval { modules::load("printer") }; + eval { modules::unload(qw(lp parport_pc parport_probe parport)) }; #- on kernel 2.4 parport has to be unloaded to probe again + eval { modules::load(qw(parport_pc lp parport_probe)); }; #- take care as not available on 2.4 kernel (silent error). } my $b = before_leaving { eval { modules::unload("parport_probe") } }; detect_devices::whatPrinter(); |