From: Christian Hansen Date: Thu, 24 Mar 2005 01:50:31 +0000 (+0000) Subject: fixed inheritance test X-Git-Tag: 5.7099_04~1696 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=32ee17975dc2c497f346fe5d450af66d7e9d2afb fixed inheritance test --- diff --git a/t/17inheritance.t b/t/17inheritance.t index fa187e5..334b196 100644 --- a/t/17inheritance.t +++ b/t/17inheritance.t @@ -16,17 +16,17 @@ TestApp->action( '!begin' => sub { my ( $self, $c ) = @_; - $c->res->output( 'foo' . $c->res->output ); + $c->res->output( 'foo' ); }, '!default' => sub { my ( $self, $c ) = @_; - $c->res->output( 'foo' . $c->res->output ); + $c->res->output( $c->res->output . 'foo' ); }, '!end' => sub { my ( $self, $c ) = @_; - $c->res->output( 'foo' . $c->res->output ); + $c->res->output( $c->res->output . 'foo'); }, ); @@ -65,4 +65,6 @@ use Data::Dumper; { my $response = request('/foo/bar'); ok( $response->content =~ /foobarfoobarfoobar/ ); + warn $response->content; + }