diff options
author | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-11-05 03:36:30 +0000 |
---|---|---|
committer | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-11-05 03:36:30 +0000 |
commit | 2256e5daab86c1f8945ff0c7f4eb69dd4ec15c95 (patch) | |
tree | d772970703c22e15431ead472958d3fae874da46 /bin/auto_compile | |
parent | 8e7499f474395b83a694d5084943e66871056d34 (diff) | |
download | ATCD-2256e5daab86c1f8945ff0c7f4eb69dd4ec15c95.tar.gz |
ChangeLogTag:Sat Nov 4 19:33:39 2000 Carlos O'Ryan <coryan@uci.edu>
Diffstat (limited to 'bin/auto_compile')
-rwxr-xr-x | bin/auto_compile | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/bin/auto_compile b/bin/auto_compile index 8e5e7588179..7d9b88b1474 100755 --- a/bin/auto_compile +++ b/bin/auto_compile @@ -241,14 +241,14 @@ sub report_errors { if ($#_ >= 0) { local $to = $ADMIN; - open (MAIL, "|".$MAIL.' -s "[AUTO_COMPILE] '.$BUILD.'" '.$to) + open (MAIL, "|".$MAIL.' -s "[AUTO_COMPILE] '.$HOST.' '.$BUILD.'" '.$to) || mydie "Cannot open mail pipe for: $_\n"; print MAIL 'The following message is brought to you by: ', "\n"; - print MAIL $CMD, ' [', $REVISION, "] for $BUILD on $CHECKOUT\n\n"; + print MAIL $CMD, ' [', $REVISION, "] for $BUILD on $HOST\n\n"; print MAIL "\nPlease check the following log for more info:\n\n"; - print MAIL $LOG_URL, $LOG_NAME, "\n\n"; + print MAIL $LOG_URL, '?', $HOST, '_', $BUILD, "\n\n"; local $m; foreach $m (@_) { |