version 1.32, 2002/06/15 19:20:14
|
version 1.34, 2002/07/03 20:54:49
|
Line 83 sub handler {
|
Line 83 sub handler {
|
} |
} |
$ENV{'request.filename'} = $r->filename; |
$ENV{'request.filename'} = $r->filename; |
|
|
$ENV{'request.copyright'} = |
|
&Apache::lonnet::metadata($requrl,'copyright'); |
|
|
|
# -------------------------------------------------------- Load POST parameters |
# -------------------------------------------------------- Load POST parameters |
|
|
|
|
Line 219 sub handler {
|
Line 216 sub handler {
|
$ENV{'request.filename'} = $r->filename; |
$ENV{'request.filename'} = $r->filename; |
return OK; |
return OK; |
} |
} |
# ----------------------------------------------- Store where they wanted to go |
# -------------------------------------------------------------- Not authorized |
|
$requrl=~/\.(\w+)$/; |
$ENV{'request.firsturl'}=$requrl; |
if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
return FORBIDDEN; |
($requrl=~/^\/adm\/(roles|logout)/)) { |
|
# -------------------------- Store where they wanted to go and get login screen |
|
$ENV{'request.firsturl'}=$requrl; |
|
return FORBIDDEN; |
|
} else { |
|
# --------------------------------------------------------------------- Goodbye |
|
return HTTP_BAD_REQUEST; |
|
} |
} |
} |
|
|
1; |
1; |