Update of /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/Plugin
In directory sc8-pr-cvs1:/tmp/cvs-serv12489/lib/HTTP/WebTest/Plugin
Modified Files:
HarnessReport.pm
Log Message:
HTTP::WebTest::Plugin::HarnessReport produced report output on STDERR
what was adding noise in 'make test' output when being used in
Test::Harness-style test suites.
Index: HarnessReport.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/Plugin/HarnessReport.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** HarnessReport.pm 13 Dec 2002 01:23:11 -0000 1.10
--- HarnessReport.pm 18 Jan 2003 10:14:55 -0000 1.11
***************
*** 68,71 ****
--- 68,75 ----
}
+ # fool Test::Builder to generate diag output on STDOUT
+ my $failure_output = $TEST->failure_output;
+ $TEST->failure_output($TEST->output);
+
$TEST->diag('-' x 60);
$TEST->diag("URL: $url");
***************
*** 90,93 ****
--- 94,100 ----
}
}
+
+ # restore failure_output
+ $TEST->failure_output($failure_output);
local $Test::Builder::Level = 3;
|