loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.101, 2009/07/22 21:51:03	version 1.101.4.1, 2009/08/12 19:28:09
Line 116 sub success {	Line 116 sub success {
my $remoteinfo=&Apache::lonmenu::load_remote_msg($lowerurl);	my $remoteinfo=&Apache::lonmenu::load_remote_msg($lowerurl);
my $setflags=&Apache::lonmenu::setflags();	my $setflags=&Apache::lonmenu::setflags();
my $maincall=&Apache::lonmenu::maincall();	my $maincall=&Apache::lonmenu::maincall();
my $brcrum = [{'href' => '',
'text' => 'Successful Login'},];
my $start_page=&Apache::loncommon::start_page('Successful Login',	my $start_page=&Apache::loncommon::start_page('Successful Login',
$startupremote,	$startupremote,
{'no_inline_link' => 1,	{'no_inline_link' => 1,});
'bread_crumbs' => $brcrum,});
my $end_page =&Apache::loncommon::end_page();	my $end_page =&Apache::loncommon::end_page();

my $continuelink;	my $continuelink;
if ($env{'environment.remote'} eq 'off') {	if (($env{'browser.interface'} eq 'textual') \|\|
	($env{'environment.remote'} eq 'off')) {
$continuelink='<a href="'.$destination.'">'.&mt('Continue').'</a>';	$continuelink='<a href="'.$destination.'">'.&mt('Continue').'</a>';
}	}
# ------------------------------------------------- Output for successful login	# ------------------------------------------------- Output for successful login