that's what you get from coding straight into your mailer...

On Fri, Dec 02, 2011 at 03:08:10PM +0100, Matthias Ferdinand wrote:
> # in C:A:Capsule
>     sub cgiapp_postrun {
>       my $self = shift;
>       my $app  = $self->{_APP_OBJECT};
> 
>       # invoke MyApp teardown
>       return $app->cgiapp_postrun($self)
>           if ($app->can("cgiapp_postrun"));
>     }


should be more like 
# in C:A:Capsule
    sub cgiapp_postrun {
      my ($self) = @_;
      my $app    = $self->{_APP_OBJECT};

      # invoke MyApp teardown
      return $app->cgiapp_postrun(@_)
          if ($app->can("cgiapp_postrun"));
    }

Regards
Matthias

#####  CGI::Application community mailing list  ################
##                                                            ##
##  To unsubscribe, or change your message delivery options,  ##
##  visit:  http://www.erlbaum.net/mailman/listinfo/cgiapp    ##
##                                                            ##
##  Web archive:   http://www.erlbaum.net/pipermail/cgiapp/   ##
##  Wiki:          http://cgiapp.erlbaum.net/                 ##
##                                                            ##
################################################################

Reply via email to