X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Funit_core_uri_for.t;h=a54150890c262a3e807b54ba2e0e6c9aa1c19c36;hp=2f4fb11f4d0623400dec951813b3101c8a77557b;hb=02336198551ec2d7edfa74911919b8804bfc69c8;hpb=082b44215ddd03a11cffe22f7f40a33ee0fa4607 diff --git a/t/aggregate/unit_core_uri_for.t b/t/aggregate/unit_core_uri_for.t index 2f4fb11..a541508 100644 --- a/t/aggregate/unit_core_uri_for.t +++ b/t/aggregate/unit_core_uri_for.t @@ -61,31 +61,22 @@ is( is( Catalyst::uri_for( $context, '/bar#fragment', { param1 => 'value1' } )->as_string, - 'http://127.0.0.1/foo/bar%23fragment?param1=value1', + 'http://127.0.0.1/foo/bar?param1=value1#fragment', 'URI for path with fragment and query params 1' ); - -is( - Catalyst::uri_for( $context, '/bar#fragment\x{2620}', { param1 => 'value1' } )->as_string, - 'http://127.0.0.1/foo/bar%23fragment%5Cx%7B2620%7D?param1=value1', - 'URI for path with fragment and query params 2' -); - - is( Catalyst::uri_for( $context, '/bar#fragment^%$', { param1 => 'value1' } )->as_string, - 'http://127.0.0.1/foo/bar%23fragment%5E%$?param1=value1', + 'http://127.0.0.1/foo/bar?param1=value1#fragment^%$', 'URI for path with fragment and query params 3' ); is( - Catalyst::uri_for( $context, '/bar', { param1 => 'value1' }, \'fragment\x{2620}' )->as_string, - 'http://127.0.0.1/foo/bar?param1=value1#fragment%5Cx%7B2620%7D', - 'URI for path with fragment and query params 2' + Catalyst::uri_for( $context, '/foo#bar/baz', { param1 => 'value1' } )->as_string, + 'http://127.0.0.1/foo/foo?param1=value1#bar/baz', + 'URI for path with fragment and query params 3' ); - # test with utf-8 is( Catalyst::uri_for( $context, 'quux', { param1 => "\x{2620}" } )->as_string,