Hello, I am trying to execute some code in the cgiapp_prerun subroutine, and it is not being executed. Here is the code:
sub setup { my $self = shift; $self->start_mode('out'); $self->mode_param('action'); $self->run_modes( 'add_system' => \&add_system, 'delete_system' => \&delete_system, ); $self->param('config' => AppAdminConfig->new()); $config = $self->param('config'); $self->param('dbh' => DBI->connect($config->get_dsn, $config->get_user_name, $config->get_password)); } sub cgiapp_prerun { my $self = shift; my $q = $self->query(); $ID = $q->cookie('ID'); if (!$ID) { $thtml = $self->load_tmpl($config->get_base_template_path . $config->get_admin_login, die_on_bad_params => 0); return $thtml->output; } } Any ideas? Roy --------------------------------------------------------------------- Web Archive: http://www.mail-archive.com/[EMAIL PROTECTED]/ To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]