[Rt-commit] r3587 - in Test-HTTP-Server-Simple:
lib/Test/HTTP/Server t
glasser at bestpractical.com
glasser at bestpractical.com
Tue Aug 2 23:08:28 EDT 2005
Author: glasser
Date: Tue Aug 2 23:08:27 2005
New Revision: 3587
Modified:
Test-HTTP-Server-Simple/lib/Test/HTTP/Server/Simple.pm
Test-HTTP-Server-Simple/t/01.basic.t
Log:
da boss sez, no status messages for you
Modified: Test-HTTP-Server-Simple/lib/Test/HTTP/Server/Simple.pm
==============================================================================
--- Test-HTTP-Server-Simple/lib/Test/HTTP/Server/Simple.pm (original)
+++ Test-HTTP-Server-Simple/lib/Test/HTTP/Server/Simple.pm Tue Aug 2 23:08:27 2005
@@ -115,8 +115,6 @@
push @CHILD_PIDS, $pid;
- $Tester->diag("Waiting for child to start up...");
-
1 while not $child_loaded_yet;
$Tester->ok(1, $text);
Modified: Test-HTTP-Server-Simple/t/01.basic.t
==============================================================================
--- Test-HTTP-Server-Simple/t/01.basic.t (original)
+++ Test-HTTP-Server-Simple/t/01.basic.t Tue Aug 2 23:08:27 2005
@@ -17,14 +17,12 @@
test_out("ok 1 - beep");
my $URL = THSS::Good->new(9583)->started_ok("beep");
-test_diag("Waiting for child to start up...");
test_test("start up correctly");
is($URL, "http://localhost:9583");
test_out("ok 1 - started server");
$URL = THSS::Good->new(9384)->started_ok;
-test_diag("Waiting for child to start up...");
test_test("start up correctly (with default message)");
is($URL, "http://localhost:9384");
More information about the Rt-commit
mailing list