--- modules/gci/lonlogin.pm 2009/11/19 15:22:20 1.5 +++ modules/gci/lonlogin.pm 2010/01/09 00:50:43 1.7 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.5 2009/11/19 15:22:20 gci Exp $ +# $Id: lonlogin.pm,v 1.7 2010/01/09 00:50:43 gci Exp $ # # Copyright Michigan State University Board of Trustees # @@ -199,6 +199,9 @@ sub handler { if ($env{'form.role'}) { $tokenextras = '&role='.&escape($env{'form.role'}); } + if ($domain eq 'gci') { + $env{'form.symb'} = '/adm/gci_info'; + } if ($env{'form.symb'}) { if (!$tokenextras) { $tokenextras = '&'; @@ -206,7 +209,7 @@ sub handler { $tokenextras .= '&symb='.&escape($env{'form.symb'}); } my $logtoken=Apache::lonnet::reply( - 'tmpput:'.$ukey.$lkey.'&'.$firsturl, + 'tmpput:'.$ukey.$lkey.'&'.$firsturl.$tokenextras, $lonhost); # ------------------- If we cannot talk to ourselves, we are in serious trouble @@ -482,7 +485,9 @@ END_OF_BLOCK1
- Note: + Note: If log-in fails, it may be because your browser is not accepting session cookies, or javascript is disabled. Learn more. |