Hi,
I'm trying:
sub mode2 {
my $self = shift;
my $session = $self-param('session');
unless ($session-param('Group2') = 3) {
return $self-display_index(); # ??
}
...
}
but when it returns to display_index (mode1) it still
thinks it's in mode2. How can I correct this?
Thanks,
Jon
On Thu, 6 Jan 2005 05:19:35 +0100, Emanuele Zeppieri wrote:
Hi Emanuele
Having seen your modules and knowing your experience as a Perl
programmer, I suspected that you already did an in-depth research
and that you already knew most of them ;-)
Thanx. I avoided mentioning anything up front so
In my app using CGI::Application::Plugin::Session, I want the basic view
to be accessible to everyone and other runmodes accessible only to people
who login. So I have a cgi_prerun function which looks like this:
sub cgiapp_prerun()
{
my ($self, $runmode) = @_;
delete $self-{newrunmode} if
This seems to be working well but my question is is there a better way?
Hi Jaldhar,
In my experiences with Perl and C::A, I've discovered that there's
always a better way. The question is whether it's worth the effort to
pursue. Against the advice of the C::A creator, I and many others on the
William McKee wrote:
This seems to be working well but my question is is there a better way?
Hi Jaldhar,
In my experiences with Perl and C::A, I've discovered that there's
always a better way. The question is whether it's worth the effort to
pursue. Against the advice of the C::A creator, I and
On 2005-01-06, Jaldhar H. Vyas [EMAIL PROTECTED] wrote:
sub cgiapp_init
{
my ($self) = @_;
$self-dbh_config('dbi:SQLite:dbname=/home/jaldhar/db', undef, undef,
{ RaiseError = 1, }) or croak Cannot connect to the database.;
$self-session_config(
CGI_SESSION_OPTIONS = [
