From a6e588310abe421c3db8cc8416e5c87497a573ab Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 26 Jan 2011 22:02:43 +0000 Subject: backport a one-liner fix from mdv: "it should say where it lacks disk space" (bogdano) --- lib/Iurt/Process.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/Iurt/Process.pm b/lib/Iurt/Process.pm index 8766715..9d740f5 100644 --- a/lib/Iurt/Process.pm +++ b/lib/Iurt/Process.pm @@ -162,7 +162,7 @@ sub perform_command { } my $df = df $opt{log}; if ($df->{per} >= 99) { - plog('WARN', "WARNING: killing current command because running out of disk space (only $df->{bavail}KB left)"); + plog('WARN', "WARNING: killing current command because running out of disk space at $opt{log} (only $df->{bavail}KB left)"); kill 14, "-$parent_pid"; exit(); } -- cgit v1.2.1