From f74c3b0afadaa40c9a784321029959a7fffdd0e6 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 24 Mar 2000 14:29:56 +0000
Subject: no_comment

---
 perl-install/modules.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'perl-install/modules.pm')

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") {
-- 
cgit v1.2.1