diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-09-01 16:53:53 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-09-01 16:53:53 +0000 |
commit | bb32bd9c55eec538622b8ce085b95b5772c48930 (patch) | |
tree | 7691ddbb199705ce3a90341c53ccc1ce1883f4dc /perl-install | |
parent | b6be9e93be33d284c55b3ba0aea0d2ec73f2c23d (diff) | |
download | drakx-bb32bd9c55eec538622b8ce085b95b5772c48930.tar drakx-bb32bd9c55eec538622b8ce085b95b5772c48930.tar.gz drakx-bb32bd9c55eec538622b8ce085b95b5772c48930.tar.bz2 drakx-bb32bd9c55eec538622b8ce085b95b5772c48930.tar.xz drakx-bb32bd9c55eec538622b8ce085b95b5772c48930.zip |
don't warn when killing /usr/lib/gconfd-2 when runs in background
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/pkgs.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 5c168f345..529fdd37e 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -1078,8 +1078,8 @@ sub install($$$;$$) { if (@killpid) { foreach (@killpid) { - my $s = "$_: " . join(' ', split("\0", cat_("/proc/$_/cmdline"))); - log::l("ERROR: DrakX should not have to clean the packages shit. Killing $s."); + my ($prog, @para) = split("\0", cat_("/proc/$_/cmdline")); + log::l("ERROR: DrakX should not have to clean the packages shit. Killing $_: " . join(' ', $prog, @para) . "."); } kill 15, @killpid; sleep 2; |