Return to lonauth.pm CVS log | Up to [LON-CAPA] / loncom / auth |
version 1.23, 2001/08/16 02:03:15 | version 1.24, 2001/08/20 12:57:02 |
---|---|
Line 8 | Line 8 |
# 07/24 Scott Harrison | # 07/24 Scott Harrison |
# 07/28,08/03 Gerd Kortemeyer | # 07/28,08/03 Gerd Kortemeyer |
# 8/15 Scott Harrison | # 8/15 Scott Harrison |
# 8/20 Gerd Kortemeyer | |
package Apache::lonauth; | package Apache::lonauth; |
Line 281 sub handler { | Line 282 sub handler { |
} | } |
if (($firsturl eq '') || ($firsturl eq '/adm/logout')) { | if (($firsturl eq '') || ($firsturl eq '/adm/logout')) { |
$firsturl='/res/adm/pages/index.html'; | $firsturl='/adm/roles'; |
} | } |
success($r,$FORM{'uname'},$FORM{'udom'},$authhost,$firsturl); | success($r,$FORM{'uname'},$FORM{'udom'},$authhost,$firsturl); |