From 6acd785c65aba17fba1b2f386b2ff0236c1ffa2c Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 27 Feb 2003 16:45:20 +0000 Subject: handle configurators with options (eg: "diskdrake --removable=scd0") --- perl-install/standalone/service_harddrake | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/service_harddrake') diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index d213a8e96..9a6a26e34 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -53,7 +53,7 @@ foreach (@harddrake::data::tree) { $msg .= "- " . harddrake::data::custom_id($ID{$_}, $item) . " was added\n" foreach @added; @added || @was_removed or next; harddrake::data::set_removable_configurator($Ident, first(values %$oldconfig, values %ID), \$configurator); - next unless -x $configurator; + next unless -x first(split /\s+/, $configurator); my ($pid, $no); $SIG{ALRM} = sub { $no = 1; kill 15, $pid }; unless ($pid = fork()) { -- cgit v1.2.1