X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=ea5507d7be1ef17d86751d9e5056ca113ed64065;hp=2f9225fbabb7b3a5d647e6412ad341ed72ccd879;hb=f0580bff341c3d9a8a62bb8e670ff8772745786f;hpb=4995a5cebbc06c813c20daabc8d248247f33cb37 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 2f9225f..ea5507d 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -102,7 +102,7 @@ __PACKAGE__->stats_class('Catalyst::Stats'); # Remember to update this in Catalyst::Runtime as well! -our $VERSION = '5.90015'; +our $VERSION = '5.90016'; sub import { my ( $class, @arguments ) = @_; @@ -1270,7 +1270,7 @@ path, use C<< $c->uri_for_action >> instead. sub uri_for { my ( $c, $path, @args ) = @_; - if (blessed($path) && $path->isa('Catalyst::Controller')) { + if ( $path->$_isa('Catalyst::Controller') ) { $path = $path->path_prefix; $path =~ s{/+\z}{}; $path .= '/'; @@ -1287,7 +1287,7 @@ sub uri_for { $arg =~ s/([^$URI::uric])/$URI::Escape::escapes{$1}/go; } - if ( blessed($path) ) { # action object + if ( $path->$_isa('Catalyst::Action') ) { # action object s|/|%2F|g for @args; my $captures = [ map { s|/|%2F|g; $_; } ( scalar @args && ref $args[0] eq 'ARRAY'