From: Sebastian Riedel <sri@labs.kraih.com>
Date: Thu, 24 Mar 2005 01:58:39 +0000 (+0000)
Subject: extended test
X-Git-Tag: 5.7099_04~1694
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=0d03ce8654687f6fc0092c84840cad986c4afbb8

extended test
---

diff --git a/t/17inheritance.t b/t/17inheritance.t
index c0386b7..cdec654 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('foo');
     },
 
-    '!default' => sub { 
+    '!default' => sub {
         my ( $self, $c ) = @_;
         $c->res->output( $c->res->output . 'foo' );
-     },
+    },
 
     '!end' => sub {
         my ( $self, $c ) = @_;
-        $c->res->output( $c->res->output . 'foo');
+        $c->res->output( $c->res->output . 'foo' );
     },
 );
 
@@ -39,10 +39,10 @@ TestApp->action(
         $c->res->output( $c->res->output . 'bar' );
     },
 
-    '!default' => sub { 
+    '!default' => sub {
         my ( $self, $c ) = @_;
         $c->res->output( $c->res->output . 'bar' );
-     },
+    },
 
     '!end' => sub {
         my ( $self, $c ) = @_;
@@ -52,17 +52,30 @@ TestApp->action(
 
 package main;
 
-use Test::More tests => 2;
+use Test::More tests => 5;
 use Catalyst::Test 'TestApp';
 
-use Data::Dumper;
-
 {
     my $response = request('/foo');
     ok( $response->content =~ /foofoofoo/ );
 }
 
 {
+    my $response = request('/foo/rab');
+    ok( $response->content =~ /foofoofoo/ );
+}
+
+{
     my $response = request('/foo/bar');
     ok( $response->content =~ /foobarfoobarfoobar/ );
 }
+
+{
+    my $response = request('/foobar');
+    ok( $response->content !~ /foofoofoo/ );
+}
+
+{
+    my $response = request('/foo_bar/yada');
+    ok( $response->content !~ /foobarfoobarfoobar/ );
+}