Subject: | -Init flag |
My Maypole apps are boiling down to lots of config in httpd.conf (loaded by MP::P::Config::Apache), custom code in model classes, and anything else goes in a plugin. So the actual driver is just
package My::App;
use This;
use That;
use Maypole::Application qw( Config::Apache My::App Foo Bar -Setup );
__PACKAGE__->init;
1;
It'd just be nice to swap the init call for an -Init flag.
Something like
elsif (/^\-Init$/) { $autoinit++; }
in the foreach, and
$caller->init() if $autosetup && $autoinit;
after the $caller->setup() line.
d.