|
version 1.68, 2003/09/15 18:43:53
|
version 1.69, 2003/09/15 21:50:49
|
|
Line 172 ENDENTERKEY
|
Line 172 ENDENTERKEY
|
| if (($ENV{'form.orgurl'}) && |
if (($ENV{'form.orgurl'}) && |
| ($ENV{'form.orgurl'}!~/^\/adm\/flip/)) { |
($ENV{'form.orgurl'}!~/^\/adm\/flip/)) { |
| my $dest=$ENV{'form.orgurl'}; |
my $dest=$ENV{'form.orgurl'}; |
| |
if ( $Apache::lonnet::perlvar{'MODPERL2'} ) { |
| &Apache::lonnet::cleanenv(); |
&Apache::lonnet::cleanenv(); |
| |
} |
| $r->internal_redirect($dest); |
$r->internal_redirect($dest); |
| return OK; |
return OK; |
| } else { |
} else { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonroles.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth