diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-03-24 14:29:56 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-03-24 14:29:56 +0000 |
commit | f74c3b0afadaa40c9a784321029959a7fffdd0e6 (patch) | |
tree | 32777c65d09619bfde64fd85ce6f4ab161bddb23 /perl-install/modules.pm | |
parent | ed76955e239d467e996ea3d20e8ae14c13db0253 (diff) | |
download | drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.gz drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.bz2 drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.xz drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.zip |
no_comment
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r-- | perl-install/modules.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 59276a3bf..38f9a6428 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -343,6 +343,10 @@ sub get_alias { my ($alias) = @_; $conf{$alias}{alias}; } +sub get_options { + my ($name) = @_; + $conf{$name}{options}; +} sub add_alias($$) { my ($alias, $name) = @_; @@ -415,7 +419,7 @@ sub unload($;$) { sub load_raw($@) { my ($name, @options) = @_; - run_program::run("insmod", $name, @options) or die("insmod $name failed"); + run_program::run("insmod", $name, grep { $_ } @options) or die("insmod $name failed"); #- this is a hack to make plip go if ($name eq "parport_pc") { |