chomp $error;
$error = qq/Caught exception "$error"/;
}
-
- $c->log->error($error);
$c->error($error);
$c->state(0);
}
sub finalize {
my $c = shift;
+ for my $error ( @{ $c->error } ) {
+ $c->log->error($error);
+ }
+
$c->finalize_uploads;
# Error
=cut
-sub get_action { my $c = shift; $c->dispatcher->get_action( $c, @_ ) }
+sub get_action { my $c = shift; $c->dispatcher->get_action( @_ ) }
=item $c->get_actions( $action, $namespace )
my $callback = sub {
my ( $component, $context ) = @_;
- unless ( $component->isa('Catalyst::Base') ) {
+ unless ( $component->isa('Catalyst::Component') ) {
return $component;
}
Sam Vilain
+Sascha Kiefer
+
Tatsuhiko Miyagawa
Ulf Edvinsson