[Catalyst-commits] r9925 - in Catalyst-Runtime/5.80/trunk: . t
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Tue Apr 28 20:58:17 GMT 2009
Author: t0m
Date: 2009-04-28 21:58:15 +0100 (Tue, 28 Apr 2009)
New Revision: 9925
Modified:
Catalyst-Runtime/5.80/trunk/Changes
Catalyst-Runtime/5.80/trunk/t/unit_core_component.t
Log:
Fix RT#43375
Modified: Catalyst-Runtime/5.80/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.80/trunk/Changes 2009-04-28 20:22:27 UTC (rev 9924)
+++ Catalyst-Runtime/5.80/trunk/Changes 2009-04-28 20:58:15 UTC (rev 9925)
@@ -18,6 +18,7 @@
incompatibility issues in some cases. (t0m)
- Additional tests for setup_stats method. (t0m)
- Fix log levels in Catalyst::Log to be properly additive. (t0m)
+ - Fix RT#43375 by sorting results before testing them (t0m)
5.80002 2009-04-22 01:28:36
- Fix CATALYST_DEBUG and MYAPP_DEBUG environment variables
Modified: Catalyst-Runtime/5.80/trunk/t/unit_core_component.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/unit_core_component.t 2009-04-28 20:22:27 UTC (rev 9924)
+++ Catalyst-Runtime/5.80/trunk/t/unit_core_component.t 2009-04-28 20:58:15 UTC (rev 9925)
@@ -59,8 +59,9 @@
# multiple returns
{
- my @expected = qw( MyApp::C::Controller MyApp::M::Model );
- is_deeply( [ MyApp->comp( qr{::[MC]::} ) ], \@expected, 'multiple results fro regexp ok' );
+ my @expected = sort qw( MyApp::C::Controller MyApp::M::Model );
+ my @got = sort MyApp->comp( qr{::[MC]::} );
+ is_deeply( \@got, \@expected, 'multiple results from regexp ok' );
}
# failed search
More information about the Catalyst-commits
mailing list