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=3318192d1e683b21cddf1dcdffd81dfbc6efe5be;hp=6732024c0c1cc521be87ab1c478f80f4bcaa3913;hb=0ee04045a413235cb1474efcb490039691ef78e6;hpb=7c1c4dc69062bd372f6611c5a2d3e054cf777d79 diff --git a/t/aggregate/unit_core_uri_for.t b/t/aggregate/unit_core_uri_for.t index 6732024..3318192 100644 --- a/t/aggregate/unit_core_uri_for.t +++ b/t/aggregate/unit_core_uri_for.t @@ -181,5 +181,16 @@ TODO: { ); } -done_testing; +{ + package MyStringThing; + + use overload '""' => sub { $_[0]->{string} }, fallback => 1; +} +is( + Catalyst::uri_for( $context, bless( { string => 'test' }, 'MyStringThing' ) ), + 'http://127.0.0.1/test', + 'overloaded object handled correctly' +); + +done_testing;