X-Git-Url: http://git.rot13.org/?p=safeq;a=blobdiff_plain;f=xwc-jobs.pl;h=3fd0f9564fc47b21fc90eb9e472b40b8e4694436;hp=a380fc69e94b0e82ef66ef4b3ef8c5938852511f;hb=a2061cb4d01e067be217fdcbc6c04e3a1fd26084;hpb=ceac1e146fe91b3c2dc921a2f1d75e392be51678

diff --git a/xwc-jobs.pl b/xwc-jobs.pl
index a380fc6..3fd0f95 100755
--- a/xwc-jobs.pl
+++ b/xwc-jobs.pl
@@ -72,9 +72,9 @@ if ( exists $info->{spcs} ) {
 	exit 0;
 
 } elsif ( exists $info->{errLog} ) {
-	print join($sep, @{ $info->{lHdr} }),"\n";
+	print join($sep, 'IP', @{ $info->{lHdr} }),"\n";
 	foreach my $error ( @{ $info->{errLog} } ) {
-		print join($sep, @{ $error }),"\n";
+		print join($sep, $ip, @{ $error }),"\n";
 	}
 	exit 0;
 
@@ -93,6 +93,8 @@ if ( exists $info->{spcs} ) {
 	exit 0;
 } 
 
+exit 1 if ! defined $info->{hdrs}; # we didn't get expected output
+
 my @headers = @{ $info->{hdrs} };
 unshift @headers, 'id' if $op eq 'list';
 unshift @headers, 'IP';