X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FDispatcher.pm;h=79e13093db5d5fd3f0353904765e4f6cfdc32a84;hb=b8c160a4a02cba800468b8bba63e244da662b694;hp=135c578972ed92573c0e23818fdf0cd8cf4ee2f5;hpb=76ac74ecb1948fe08bf9ebfbcf0833a398763f1f;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Dispatcher.pm b/lib/Catalyst/Dispatcher.pm index 135c578..79e1309 100644 --- a/lib/Catalyst/Dispatcher.pm +++ b/lib/Catalyst/Dispatcher.pm @@ -308,9 +308,6 @@ sub _invoke_as_path { sub _find_component { my ( $self, $c, $component ) = @_; - # fugly, why doesn't ->component('MyApp') work? - return $c if ($component eq blessed($c)); - return blessed($component) ? $component : $c->component($component); @@ -510,7 +507,6 @@ sub register { my $registered = $self->_registered_dispatch_types; - #my $priv = 0; #seems to be unused foreach my $key ( keys %{ $action->attributes } ) { next if $key eq 'Private'; my $class = "Catalyst::DispatchType::$key"; @@ -739,7 +735,7 @@ foreach my $public_method_name (qw/ $package_hash{$class}++ || do { warn("Class $class is calling the deprecated method\n" . " Catalyst::Dispatcher::$public_method_name,\n" - . " this will be removed in Catalyst 5.9X\n"); + . " this will be removed in Catalyst 5.9\n"); }; }); }