diff options
| author | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-03-24 02:38:18 +0000 |
|---|---|---|
| committer | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-03-24 02:38:18 +0000 |
| commit | 114e1ae022045a4a542021e503b72ea3aa125e4b (patch) | |
| tree | fd8e8b3a2766813aa6018a4c020e342292c7ac65 /bin/check_build_logs | |
| parent | 4520df538216408100489bc2f106d8286ac04a88 (diff) | |
| download | ATCD-114e1ae022045a4a542021e503b72ea3aa125e4b.tar.gz | |
ChangeLogTag: Thu Mar 23 20:37:19 2000 David L. Levine <levine@cs.wustl.edu>
Diffstat (limited to 'bin/check_build_logs')
| -rwxr-xr-x | bin/check_build_logs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/bin/check_build_logs b/bin/check_build_logs index 93876bae517..f50add24bf1 100755 --- a/bin/check_build_logs +++ b/bin/check_build_logs @@ -89,6 +89,7 @@ chdir $log_directory || (my $log_files = ( `$find . -name '*.log' -daystart -ctime 0 -print` )) =~ tr [\n] [ ]; +$log_files =~ s%\./(make)%$1%g; #### Remove leading ./ from each filename. #### @@ -154,9 +155,7 @@ if ($#output == -1) { #### Print URL for each log file, using $urlprefix. print "They are also available at:\n"; - my @logs = split /\s+/, $log_files; - foreach my $log (@logs) { - $log =~ s%^\./%%; #### Remove leading ./ + foreach my $log (split /\s+/, $log_files) { print " $urlprefix$log\n"; } } |