From 042071a56561a37e3328706c3f4b07201d0285e6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 1 Apr 2004 10:10:19 +0000 Subject: let execl() handle the arg array (this is safer) --- 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 f3b763979..2511ec87a 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -94,7 +94,7 @@ foreach (@harddrake::data::tree) { my ($pid, $no); $SIG{ALRM} = sub { $no = 1; kill 15, $pid }; unless ($pid = fork()) { - exec("/usr/share/harddrake/confirm '$Ident' '$timeout' '$msg'"); + exec("/usr/share/harddrake/confirm", $Ident, $timeout, $msg); } alarm($timeout); wait(); -- cgit v1.2.1