my ( $self, $c, $component_or_class, $method ) = @_;
my $component = $self->_find_component($c, $component_or_class);
- my $component_class = blessed $component || return 0;
+ my $component_class = blessed($component) || $component || return 0;
- if (my $code = $component_class->can('action_for')) {
+ if ( blessed $component and my $code = $component_class->can('action_for') ) {
my $possible_action = $component->$code($method);
return $possible_action if $possible_action;
}
=head2 $self->setup_actions( $class, $context )
-Loads all of the preload dispatch types, registers their actions and then
-loads all of the postload dispatch types, and iterates over the tree of
+Loads all of the pre-load dispatch types, registers their actions and then
+loads all of the post-load dispatch types, and iterates over the tree of
actions, displaying the debug information if appropriate.
=cut