X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Funit_core_uri_for.t;h=c6726f6a7f84e8d881412547e6d1cfbe2d60feb7;hp=4b020212e2157c1f8d865bd1568bc26670261963;hb=d3e7a648cc29a8b45ddcd4ef731e3f9b0b4f919c;hpb=66741f94ac93b7ba0989db3556d0e3fe36c1be87 diff --git a/t/unit_core_uri_for.t b/t/unit_core_uri_for.t index 4b02021..c6726f6 100644 --- a/t/unit_core_uri_for.t +++ b/t/unit_core_uri_for.t @@ -1,7 +1,7 @@ use strict; use warnings; -use Test::More tests => 6; +use Test::More tests => 7; use Test::MockObject; use URI; @@ -26,6 +26,13 @@ is( 'URI for relative path' ); +is( + Catalyst::uri_for( $context, '', 'arg1', 'arg2' )->as_string, + 'http://127.0.0.1/foo/yada/arg1/arg2', + 'URI for undef action with args' +); + + is( Catalyst::uri_for( $context, '../quux' )->as_string, 'http://127.0.0.1/foo/quux', 'URI for relative dot path' );