X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F13beginend.t;fp=t%2F13beginend.t;h=0000000000000000000000000000000000000000;hb=5a8fd7e9d4cca2af0237e1659f061cc64618bfe6;hp=81bd9d9ca969024203616b792db74e279df9176d;hpb=b76d7db825981c235ff6cfa02b3d393424eaea0e;p=catagits%2FCatalyst-Runtime.git diff --git a/t/13beginend.t b/t/13beginend.t deleted file mode 100644 index 81bd9d9..0000000 --- a/t/13beginend.t +++ /dev/null @@ -1,46 +0,0 @@ -package TestApp; - -use Catalyst qw[-Engine=Test]; - -__PACKAGE__->action( - - '!begin' => sub { - my ( $self, $c ) = @_; - $c->res->output('foo'); - }, - - '!default' => sub { }, - - '!end' => sub { - my ( $self, $c ) = @_; - $c->res->output( $c->res->output . 'bar' ); - }, - -); - -package TestApp::C::Foo::Bar; - -TestApp->action( - - '!begin' => sub { - my ( $self, $c ) = @_; - $c->res->output('yada'); - }, - - '!default' => sub { }, - - '!end' => sub { - my ( $self, $c ) = @_; - $c->res->output('yada'); - $c->res->output( $c->res->output . 'yada' ); - }, - -); - -package main; - -use Test::More tests => 2; -use Catalyst::Test 'TestApp'; - -ok( get('/foo') =~ /foobar/ ); -ok( get('/foo/bar/foo') =~ /yadayada/ );