[Catalyst-commits] r11870 - Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/t/aggregate

[zby at dev.catalyst.perl.org]

Author: zby
Date: 2009-11-17 16:24:51 +0000 (Tue, 17 Nov 2009)
New Revision: 11870

Modified:
   Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/t/aggregate/unit_core_uri_for_action.t
Log:
context creation fixed in t/aggregate/unit_core_uri_for_action.t

Modified: Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/t/aggregate/unit_core_uri_for_action.t
===================================================================
--- Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/t/aggregate/unit_core_uri_for_action.t	2009-11-17 16:19:35 UTC (rev 11869)
+++ Catalyst-Runtime/5.80/branches/basic-app-ctx-separation-cleaned/t/aggregate/unit_core_uri_for_action.t	2009-11-17 16:24:51 UTC (rev 11870)
@@ -92,10 +92,12 @@
                 base => URI->new('http://127.0.0.1/foo')
               } );
 
-my $context = TestApp->new( {
+my $application = TestApp->new;
+my $context = Catalyst::Context->new( 
+                application => $application,
                 request => $request,
                 namespace => 'yada',
-              } );
+              );
 
 is($context->uri_for($context->controller('Action')),
    "http://127.0.0.1/foo/yada/action/",