|
version 1.38, 2003/02/03 18:03:52
|
version 1.41, 2003/04/03 16:50:46
|
|
Line 176 sub handler {
|
Line 176 sub handler {
|
| if ($ENV{'request.course.id'}) { |
if ($ENV{'request.course.id'}) { |
| &Apache::lonnet::countacc($requrl); |
&Apache::lonnet::countacc($requrl); |
| $requrl=~/\.(\w+)$/; |
$requrl=~/\.(\w+)$/; |
| if (&Apache::loncommon::fileembstyle($1) eq 'ssi') { |
if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
| |
($requrl=~/^\/adm\/(aboutme|navmaps|smppg|bulletinboard|wrapper)/) || |
| |
($requrl=~/^\/public\/.*\/syllabus$/)) { |
| # ------------------------------------- This is serious stuff, get symb and log |
# ------------------------------------- This is serious stuff, get symb and log |
| my $query=$r->args; |
my $query=$r->args; |
| my $symb; |
my $symb; |
|
Line 226 sub handler {
|
Line 228 sub handler {
|
| # -------------------------------------------------------------- Not authorized |
# -------------------------------------------------------------- Not authorized |
| $requrl=~/\.(\w+)$/; |
$requrl=~/\.(\w+)$/; |
| if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
| ($requrl=~/^\/adm\/(roles|logout)/) || |
($requrl=~/^\/adm\/(roles|logout|email|menu|remote)/) || |
| ($requrl=~m|^/prtspool/|)) { |
($requrl=~m|^/prtspool/|)) { |
| # -------------------------- Store where they wanted to go and get login screen |
# -------------------------- Store where they wanted to go and get login screen |
| $ENV{'request.firsturl'}=$requrl; |
$ENV{'request.querystring'}=$r->args; |
| |
$ENV{'request.firsturl'}=$requrl; |
| return FORBIDDEN; |
return FORBIDDEN; |
| } else { |
} else { |
| # --------------------------------------------------------------------- Goodbye |
# --------------------------------------------------------------------- Goodbye |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonacc.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth