X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2F13default.t;h=4c5c55c8a55a04044db140fc7e566641c9248161;hp=ed3ca046d83ad8d679bae4eaf986e30dd6fc0ad0;hb=424b2705f759cef65acfaf8ea0f43e6bef75b534;hpb=5a8fd7e9d4cca2af0237e1659f061cc64618bfe6

diff --git a/t/13default.t b/t/13default.t
index ed3ca04..4c5c55c 100644
--- a/t/13default.t
+++ b/t/13default.t
@@ -2,21 +2,21 @@ package TestApp;
 
 use Catalyst qw[-Engine=Test];
 
-__PACKAGE__->action(
-    '!default' => sub {
-        my ( $self, $c ) = @_;
-        $c->res->output('bar');
-    }
-);
+sub default : Private {
+    my ( $self, $c ) = @_;
+    $c->res->output('bar');
+}
+
+__PACKAGE__->setup;
 
 package TestApp::C::Foo::Bar;
 
-TestApp->action(
-    '!default' => sub {
-        my ( $self, $c ) = @_;
-        $c->res->output('yada');
-    }
-);
+use base 'Catalyst::Base';
+
+sub default : Private {
+    my ( $self, $c ) = @_;
+    $c->res->output('yada');
+}
 
 package main;