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

fixed: loginBox macro can no longer return the user to the logout page, logging them out

Browse source
This commit is contained in:
Doug Bell 2008-08-19 20:39:43 +00:00
parent 27a76cd9a3
commit 57b8cc4bae
11 changed files with 78 additions and 123 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Macro/L_loginBox.pm
View file

@ -77,17 +77,23 @@ sub process {
$var{'logout.label'} = $i18n->get(49);
# A hidden field with the current URL
my $returnUrl = $session->url->page;
if ( !$session->form->get("op") eq "auth" ) {
$returnUrl .= '?' . $session->env->get( "QUERY_STRING" );
}
$var{'form.returnUrl'}
= WebGUI::Form::hidden( $session, {
name => 'returnUrl',
value => $session->url->page($session->env->get("QUERY_STRING")),
});
# Fix box size
my $boxSize = $param[0];
$boxSize = 12 unless ($boxSize);
if (index(lc($session->env->get("HTTP_USER_AGENT")),"msie") < 0) {
$boxSize = int($boxSize=$boxSize*2/3);
}
my $action;
if ($session->setting->get("encryptLogin")) {
$action = $session->url->page(undef,1);