diff options
author | Johnny Willemsen <jwillemsen@remedy.nl> | 2006-06-19 10:10:46 +0000 |
---|---|---|
committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2006-06-19 10:10:46 +0000 |
commit | 9912f90bd687c72c62559c6e9eb548f7479d7fc6 (patch) | |
tree | 4e971d7085b95048eb5c062b40f528113e9c683b | |
parent | fd3df7f8b38116c60f0f3605d2d2232f65aa4eb0 (diff) | |
download | ATCD-9912f90bd687c72c62559c6e9eb548f7479d7fc6.tar.gz |
*** empty log message ***
-rwxr-xr-x | bin/diff-builds.pl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/bin/diff-builds.pl b/bin/diff-builds.pl index 11a8bd1ba40..d1932681e4d 100755 --- a/bin/diff-builds.pl +++ b/bin/diff-builds.pl @@ -92,9 +92,10 @@ sub load_failed_tests_list ($$) print "Build times for $file on $date are " . join (', ', @timestamps) . "\n" unless !$debugging; - die "No builds for $file on $date. The closest earlier date is " - . find_closest_earlier ($file, $date) . "\n" - unless ($#timestamps > -1); + if ($#timestamps == -1) { + print "No builds for $file on $date. The closest earlier date is " + . find_closest_earlier ($file, $date) . "\n\n" + } my $fullfile = $file .'_' . $date . '_' . $timestamps[0]; my ($fh, $tmpfile) = tempfile ($fullfile . ".XXXXXX", UNLINK => 1); @@ -105,7 +106,7 @@ sub load_failed_tests_list ($$) system ("wget " . $verbose . " \'" .$teststaturl . $fullfile . ".log\' -O - | sort >\'" . $tmpfile . '\''); close ($fh); - + return $tmpfile; } |