version 1.16, 2001/01/06 16:12:24
|
version 1.17, 2001/05/28 22:29:17
|
Line 2
|
Line 2
|
# Cookie Based Access Handler |
# Cookie Based Access Handler |
# 5/21/99,5/22,5/29,5/31,6/15,16/11,22/11, |
# 5/21/99,5/22,5/29,5/31,6/15,16/11,22/11, |
# 01/06,01/13,05/31,06/01,09/06,09/25,09/28,10/30,11/6, |
# 01/06,01/13,05/31,06/01,09/06,09/25,09/28,10/30,11/6, |
# 12/25,12/26,06/01 Gerd Kortemeyer |
# 12/25,12/26, |
|
# 01/06/01,05/28 Gerd Kortemeyer |
|
|
package Apache::lonacc; |
package Apache::lonacc; |
|
|
Line 41 sub handler {
|
Line 42 sub handler {
|
$ENV{$envname} = $envvalue; |
$ENV{$envname} = $envvalue; |
} |
} |
$ENV{'user.environment'} = "$lonidsdir/$handle.id"; |
$ENV{'user.environment'} = "$lonidsdir/$handle.id"; |
$ENV{'request.state'} = "published"; |
if ($requrl=~/^\/res\/) { |
|
$ENV{'request.state'} = "published"; |
|
} else { |
|
$ENV{'request.state'} = 'unknown'; |
|
} |
$ENV{'request.filename'} = $r->filename; |
$ENV{'request.filename'} = $r->filename; |
|
|
# --------------------- Figure out referer, first from HTTP_REFERER, then cache |
# --------------------- Figure out referer, first from HTTP_REFERER, then cache |