|
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/)) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnavmaps.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface