From: <ope...@li...> - 2004-07-30 12:57:33
|
Update of /cvsroot/openca/openca-0.9/src/modules/openca-session In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1718/openca-0.9/src/modules/openca-session Modified Files: Session.pm Log Message: fixed server startup Michael Index: Session.pm =================================================================== RCS file: /cvsroot/openca/openca-0.9/src/modules/openca-session/Session.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** Session.pm 11 Jun 2004 14:03:05 -0000 1.5 --- Session.pm 30 Jul 2004 12:57:24 -0000 1.6 *************** *** 238,241 **** --- 238,243 ---- { my $self = shift; + return $self->setError ("You cannot set a session parameter if there is no session created or loaded.", 123456) + if (not exists $self->{session}); $self->{session}->param ($_[0], $_[1]); $self->{session}->flush; |