summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorcoryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1998-08-18 14:15:33 +0000
committercoryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1998-08-18 14:15:33 +0000
commit1482455ee79a5f82607cecaa3e13eba202e2d2cb (patch)
tree1000c3c3c06a8523705f98e8ce85796efa301a36
parent009f20c559307f7f13dc767622707e368423c5a2 (diff)
downloadATCD-1482455ee79a5f82607cecaa3e13eba202e2d2cb.tar.gz
Added some fixes to the error reporting code.
-rwxr-xr-xbin/auto_compile6
1 files changed, 5 insertions, 1 deletions
diff --git a/bin/auto_compile b/bin/auto_compile
index 4c10ab06934..1fcc330fdf6 100755
--- a/bin/auto_compile
+++ b/bin/auto_compile
@@ -84,7 +84,11 @@ sub mydie {
|| die "cannot open email pipe on error: $msg\n";
print MAIL 'The following error is brought to you by: ', "\n";
print MAIL $CMD, ' [', $REVISION, "] for $BUILD on $CHECKOUT\n";
- print MAIL "\n", @msg, "\n";
+ print MAIL "\n";
+ local $m;
+ foreach $m (@msg) {
+ print MAIL $m, "\n";
+ }
print MAIL "\nPlease check log files for more info\n";
close(MAIL)
|| die "cannot close email pipe on error: $msg\n";