Return to lonroles.pm CVS log | Up to [LON-CAPA] / loncom / auth |
version 1.262, 2011/10/21 16:28:49 | version 1.263, 2011/10/25 15:15:02 |
---|---|
Line 603 ENDENTERKEY | Line 603 ENDENTERKEY |
if ($role eq 'au') { | if ($role eq 'au') { |
$redirect_url.=$env{'user.domain'}.'/'.$env{'user.name'}; | $redirect_url.=$env{'user.domain'}.'/'.$env{'user.name'}; |
} else { | } else { |
$where =~ /\/(.*)$/; | $redirect_url .= $where; |
$redirect_url .= $1; | |
} | } |
$redirect_url .= '/'; | $redirect_url .= '/'; |
&redirect_user($r,&mt('Entering Construction Space'), | &redirect_user($r,&mt('Entering Construction Space'), |