projects
/
irspy-moved-to-github.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3d06ff9
)
Task-level logging for failed tests.
author
Mike Taylor
<mike@indexdata.com>
Tue, 17 Oct 2006 15:46:30 +0000
(15:46 +0000)
committer
Mike Taylor
<mike@indexdata.com>
Tue, 17 Oct 2006 15:46:30 +0000
(15:46 +0000)
lib/ZOOM/IRSpy.pm
patch
|
blob
|
history
diff --git
a/lib/ZOOM/IRSpy.pm
b/lib/ZOOM/IRSpy.pm
index
aad702c
..
595d427
100644
(file)
--- a/
lib/ZOOM/IRSpy.pm
+++ b/
lib/ZOOM/IRSpy.pm
@@
-1,4
+1,4
@@
-# $Id: IRSpy.pm,v 1.31 2006-10-13 15:17:25 mike Exp $
+# $Id: IRSpy.pm,v 1.32 2006-10-17 15:46:30 mike Exp $
package ZOOM::IRSpy;
package ZOOM::IRSpy;
@@
-404,6
+404,7
@@
sub check {
} elsif ($res == ZOOM::IRSpy::Status::TEST_GOOD ||
$res == ZOOM::IRSpy::Status::TEST_BAD) {
my $x = ($res == ZOOM::IRSpy::Status::TEST_GOOD) ? "good" : "bad";
} elsif ($res == ZOOM::IRSpy::Status::TEST_GOOD ||
$res == ZOOM::IRSpy::Status::TEST_BAD) {
my $x = ($res == ZOOM::IRSpy::Status::TEST_GOOD) ? "good" : "bad";
+ $conn->log("irspy_task", "test ended during task $task ($x)");
$conn->log("irspy_test", "test completed ($x)");
$conn->current_task(0);
$conn->next_task(0);
$conn->log("irspy_test", "test completed ($x)");
$conn->current_task(0);
$conn->next_task(0);