summaryrefslogtreecommitdiffstats
path: root/perl-install/modules.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-16 01:59:53 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-16 01:59:53 +0000
commita601b24141811e50d946f27ad05194593c487754 (patch)
tree53001515b4658ba8319546a124bc37ec039c6b76 /perl-install/modules.pm
parent2f218cdfc7aeabb3babcbc49ecd9ca9b082cf6a8 (diff)
downloaddrakx-backup-do-not-use-a601b24141811e50d946f27ad05194593c487754.tar
drakx-backup-do-not-use-a601b24141811e50d946f27ad05194593c487754.tar.gz
drakx-backup-do-not-use-a601b24141811e50d946f27ad05194593c487754.tar.bz2
drakx-backup-do-not-use-a601b24141811e50d946f27ad05194593c487754.tar.xz
drakx-backup-do-not-use-a601b24141811e50d946f27ad05194593c487754.zip
add load_with_options()
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r--perl-install/modules.pm15
1 files changed, 10 insertions, 5 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 31792b6e0..b33617a41 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -67,15 +67,20 @@ sub load_raw {
}
sleep 2 if any { /^(usb-storage|mousedev|printer)$/ } @$l;
}
-sub load {
- my (@l) = @_;
- @l = map {
+sub load_with_options {
+ my ($l, $h_options) = @_;
+
+ my @l = map {
dependencies_closure(cond_mapping_24_26($_));
- } @l;
+ } @$l;
@l = remove_loaded_modules(@l) or return;
- load_raw(\@l, {});
+ load_raw(\@l, $h_options);
+}
+sub load {
+ my (@l) = @_;
+ load_with_options(\@l, {});
}
# eg: load_and_configure($modules_conf, 'vfat', 'reiserfs', [ ne2k => 'io=0xXXX', 'dma=5' ])