version 1.18, 2001/10/26 17:09:04
|
version 1.19, 2001/10/31 17:44:42
|
Line 444 sub handler {
|
Line 444 sub handler {
|
# ---------------------------------------------------------------- Send headers |
# ---------------------------------------------------------------- Send headers |
|
|
$r->content_type('text/html'); |
$r->content_type('text/html'); |
|
&Apache::loncommon::no_cache($r); |
$r->send_http_header; |
$r->send_http_header; |
my $date=localtime; |
my $date=localtime; |
$r->print( |
$r->print( |
'<html>'.&Apache::loncommon::cacheheader(). |
'<html><head><title>Navigate LON-CAPA Maps</title></head>'); |
'<head><title>Navigate LON-CAPA Maps</title></head>'); |
|
$r->print('<body bgcolor="#FFFFFF"'); |
$r->print('<body bgcolor="#FFFFFF"'); |
if (($currenturl=~/^\/res/) && |
if (($currenturl=~/^\/res/) && |
($currenturl!~/^\/res\/adm/)) { |
($currenturl!~/^\/res\/adm/)) { |