version 1.64, 2002/10/04 15:35:26
|
version 1.65, 2002/10/04 15:38:22
|
Line 840 sub new_handle {
|
Line 840 sub new_handle {
|
my $date=localtime; |
my $date=localtime; |
$r->print("<h3>$date</h3>\n"); |
$r->print("<h3>$date</h3>\n"); |
$r->rflush(); |
$r->rflush(); |
$r->print('<img src="/adm/lonMisc/chat.gif"> New discussion since '. |
if ($navmap->{LAST_CHECK}) { |
timeToHumanString($navmap->{LAST_CHECK}). |
$r->print('<img src="/adm/lonMisc/chat.gif"> New discussion since '. |
'<br><img src="/adm/lonMisc/feedback.gif"> New message (click to open)<p>'); |
timeToHumanString($navmap->{LAST_CHECK}). |
|
'<br><img src="/adm/lonMisc/feedback.gif"> New message (click to open)<p>'); |
|
} else { |
|
$r->print('<img src="/adm/lonMisc/chat.gif"> Discussions'. |
|
'<br><img src="/adm/lonMisc/feedback.gif"> New message (click to open)<p>'); |
|
} |
#if (($currenturl=~/^\/res/) && |
#if (($currenturl=~/^\/res/) && |
# ($currenturl!~/^\/res\/adm/)) { |
# ($currenturl!~/^\/res\/adm/)) { |
# $r->print('<a href="#curloc">Current Location</a><p>'); |
# $r->print('<a href="#curloc">Current Location</a><p>'); |