http://journal.soffritto.org/entry/340の続き。結局、app/system/config.pmをつくって
package system::config;
use strict;
use warnings;
use utf8;
use base qw(NanoA::Config);
sub new {
my ($class, $opts) = @_;
my $self = $class->SUPER::new($opts);
$self->{not_found} = 'myapp/start';
$self;
}
1;
などとすればOK。→これを管理画面からやれるといいですね、というお話ですね。