version 1.18, 2001/05/28 22:47:18
|
version 1.20, 2001/08/12 01:18:37
|
Line 3
|
Line 3
|
# 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, |
# 12/25,12/26, |
# 01/06/01,05/28 Gerd Kortemeyer |
# 01/06/01,05/28,8/11 Gerd Kortemeyer |
|
|
package Apache::lonacc; |
package Apache::lonacc; |
|
|
Line 49 sub handler {
|
Line 49 sub handler {
|
} |
} |
$ENV{'request.filename'} = $r->filename; |
$ENV{'request.filename'} = $r->filename; |
|
|
# --------------------- Figure out referer, first from HTTP_REFERER, then cache |
|
|
|
my $referer=''; |
|
if ($referer=$r->header_in('Referer')) { |
|
$ENV{'HTTP_REFERER'}=$referer; |
|
} else { |
|
$ENV{'HTTP_REFERER'}=$ENV{'httpref.'.$requrl}; |
|
} |
|
|
|
# -------------------------------------------------------- Load POST parameters |
# -------------------------------------------------------- Load POST parameters |
|
|
|
|