From bbed8e35f9ab2d20790c632dfa70fdb1994ca797 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 10 Sep 2004 06:58:01 +0000 Subject: perl_checker cleanups --- perl-install/standalone/service_harddrake | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index 890c7b446..dc230a540 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -162,9 +162,9 @@ foreach my $hw_class (@harddrake::data::tree) { if (fork()) { wait(); } else { - log::explanations("run \"$program\""); + log::explanations(qq(run "$program")); exec("$program 2>/dev/null") or do { - log::explanations("cannot run \"$program\""); + log::explanations(qq(cannot run "$program")); require POSIX; POSIX::_exit(); }; -- cgit v1.2.1