X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Funit_load_catalyst_test.t;h=7688380ddad5a39f08a2e6e280f7cdf13198ef8f;hb=55dd186c208e793527a85a8966eb05c249b62fb2;hp=ffa5655974feca1682e13ca68bc9c63426b7c5ca;hpb=702729f5b5cc59e387ec637e543ab6ef635bd0f2;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/unit_load_catalyst_test.t b/t/unit_load_catalyst_test.t
index ffa5655..7688380 100644
--- a/t/unit_load_catalyst_test.t
+++ b/t/unit_load_catalyst_test.t
@@ -5,7 +5,7 @@ use warnings;
 
 use FindBin;
 use lib         "$FindBin::Bin/lib";
-use Test::More  tests => 59;
+use Test::More  tests => 61;
 use FindBin qw/$Bin/;
 use lib "$Bin/lib";
 use Catalyst::Utils;
@@ -89,6 +89,9 @@ use_ok( $Class );
                                 "               Content recorded in response" );
         ok( $c->stash,          "               Stash accessible" );
         ok( $c->action,         "               Action object accessible" );
+        ok( $res->request,      "               Response has request object" );
+        lives_and { is( $res->request->uri, $Url) }
+                                "               Request object has correct url";
     } }
 }