version 1.3, 2022/06/26 18:17:01
|
version 1.4, 2022/08/24 20:58:50
|
Line 91 sub handler {
|
Line 91 sub handler {
|
$url .= '?ltoken='.$env{'form.rtoken'}; |
$url .= '?ltoken='.$env{'form.rtoken'}; |
$r->print(&Apache::loncommon::start_page('Updating session',undef, |
$r->print(&Apache::loncommon::start_page('Updating session',undef, |
{'only_body' => 1, |
{'only_body' => 1, |
'redirect' => [1,$url]}). |
'redirect' => [1,$url,'',$data{'lcssowin'}]}). |
'<p>'.&mt('Updating old session information').'</p>'. |
'<p>'.&mt('Updating old session information').'</p>'. |
&Apache::loncommon::end_page()); |
&Apache::loncommon::end_page()); |
return OK; |
return OK; |
} |
} |
} |
} |
} |
} |
|
my $args = {'only_body' => 1}; |
|
if ($data{'lcssowin'}) { |
|
$args->{'redirect'} = [1,$data{'origurl'},'',$data{'lcssowin'}]; |
|
} |
if ($data{'linkprot'}) { |
if ($data{'linkprot'}) { |
$r->print(&Apache::loncommon::start_page('Updating session',undef,{'only_body' => 1})); |
$r->print(&Apache::loncommon::start_page('Updating session',undef,$args)); |
if ($data{'linkprotuser'} ne '') { |
if ($data{'linkprotuser'} ne '') { |
$r->print(&mt('Although your credentials were authenticated, the username you entered did not match what was expected [_1] from the link you followed',"($data{'linkprotuser'})")); |
$r->print(&mt('Although your credentials were authenticated, the username you entered did not match what was expected [_1] from the link you followed',"($data{'linkprotuser'})")); |
} else { |
} else { |
$r->print(&mt('Expired any existing session')); |
$r->print(&mt('Expired any existing session')); |
} |
} |
} else { |
} else { |
$r->print(&Apache::loncommon::start_page('Session removed',undef,{'only_body' => 1})); |
$r->print(&Apache::loncommon::start_page('Session removed',undef,$args)); |
$r->print(&mt('Expired any existing session')); |
$r->print(&mt('Expired any existing session')); |
} |
} |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |