[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