On Tue, Jun 19, 2007 at 07:02:42PM +0100, Matt S Trout wrote:
> > I'd be fairly willing to say this is a bug and it should be doing
> >
> > {
> > no strict 'refs';
> > no warnings 'redefine';
> > local *{"${appclass}::setup"} = sub { shift->NEXT::setup(@_); };
> > local *setup = sub {};
> > $app->setup;
> > }
> >
> > Maybe somebody could put together a test case for this behaviour?
>
> *PROD*
>
> Quinn, that any better for you?
Or, if you don't want your setup to be run twice, don't call it setup.
;)
package MyApp;
use Catalyst;
__PACKAGE__->app_setup( @plugins );
sub app_setup {
my $self = shift;
$self->setup( @_ );
}
--
Bill Moseley
[EMAIL PROTECTED]
_______________________________________________
List: Catalyst@lists.rawmode.org
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/catalyst@lists.rawmode.org/
Dev site: http://dev.catalyst.perl.org/
