oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

prototype fix for page hopping after login

Browse source
This commit is contained in:
Colin Kuskie 2007-03-24 22:19:57 +00:00
parent e58f062114
commit 48a67a803e
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Auth.pm
View file

@ -400,9 +400,9 @@ sub displayLogin {
my $method = $_[0] || "login"; my $method = $_[0] || "login";
my $vars = $_[1]; my $vars = $_[1];
# Automatically set redirectAfterLogin unless we've linked here directly # Automatically set redirectAfterLogin unless we've linked here directly
# or it's already been set. # or it's already been set to perform another operation
unless ($self->session->form->process("op") eq "auth" unless ($self->session->form->process("op") eq "auth"
|| $self->session->scratch->get("redirectAfterLogin") ) { || ($self->session->scratch->get("redirectAfterLogin") =~ /op=\w+/) ) {
$self->session->scratch->set("redirectAfterLogin",$self->session->url->page($self->session->env->get("QUERY_STRING"))); $self->session->scratch->set("redirectAfterLogin",$self->session->url->page($self->session->env->get("QUERY_STRING")));
} }
my $i18n = WebGUI::International->new($self->session); my $i18n = WebGUI::International->new($self->session);