[Catalyst-commits] r8740 - Catalyst-Runtime/5.80/trunk/t

andyg at dev.catalyst.perl.org andyg at dev.catalyst.perl.org
Fri Dec 5 08:28:00 GMT 2008


Author: andyg
Date: 2008-12-05 08:27:59 +0000 (Fri, 05 Dec 2008)
New Revision: 8740

Modified:
   Catalyst-Runtime/5.80/trunk/t/live_engine_response_print.t
Log:
Sort keys in this test so it always runs in the same order

Modified: Catalyst-Runtime/5.80/trunk/t/live_engine_response_print.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/live_engine_response_print.t	2008-12-05 08:15:54 UTC (rev 8739)
+++ Catalyst-Runtime/5.80/trunk/t/live_engine_response_print.t	2008-12-05 08:27:59 UTC (rev 8740)
@@ -15,7 +15,7 @@
    three => "foo,bar,baz",
 };
 
-for my $action ( keys %{$expected} ) {
+for my $action ( sort keys %{$expected} ) {
     ok( my $response = request('http://localhost/engine/response/print/' . $action ),
         'Request' );
     ok( $response->is_success, "Response $action successful 2xx" );




More information about the Catalyst-commits mailing list