summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs/dmraid.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/fs/dmraid.pm b/perl-install/fs/dmraid.pm
index 9edd2c05b..4b317ef5e 100644
--- a/perl-install/fs/dmraid.pm
+++ b/perl-install/fs/dmraid.pm
@@ -29,8 +29,8 @@ sub init() {
#- call_dmraid is overloaded when debugging, see the end of this file
sub call_dmraid {
- my ($option) = @_;
- run_program::get_stdout('dmraid', $option);
+ my ($option, @args) = @_;
+ run_program::get_stdout('dmraid', $option, @args);
}
sub check {
@@ -170,11 +170,11 @@ if ($ENV{DRAKX_DEBUG_DMRAID}) {
);
*call_dmraid = sub {
- my ($option) = @_;
+ my ($option, @args) = @_;
if (my $s = $debug_data{$ENV{DRAKX_DEBUG_DMRAID}}{$option}) {
split("\n", $s);
} else {
- warn "dmraid @_\n";
+ warn "dmraid $option @args\n";
}
};
EOF