version 1.2, 2002/08/14 15:57:53
|
version 1.3, 2002/08/14 16:24:00
|
Line 51 sub handler {
|
Line 51 sub handler {
|
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['lastid']); |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['lastid']); |
my $include=0; |
my $include=0; |
my $newstuff=''; |
my $newstuff=''; |
|
my $bottomid=''; |
unless ($ENV{'form.lastid'}) { |
unless ($ENV{'form.lastid'}) { |
$include=1; |
$include=1; |
$newstuff='<html><body bgcolor="#FFFFFF">'; |
$newstuff='<html><body bgcolor="#FFFFFF">'; |
Line 73 sub handler {
|
Line 74 sub handler {
|
$newstuff.='<a name="'.$id.'"><b>'. |
$newstuff.='<a name="'.$id.'"><b>'. |
$sender.'</b> ('.localtime($msgtime).'): '. |
$sender.'</b> ('.localtime($msgtime).'): '. |
$contrib."<br>"; |
$contrib."<br>"; |
|
$bottomid=$id; |
} else { |
} else { |
$_=~/^(\w+)/; |
$_=~/^(\w+)/; |
if ($1 eq $ENV{'form.lastid'}) { $include=1; } |
if ($1 eq $ENV{'form.lastid'}) { $include=1; } |
Line 87 sub handler {
|
Line 89 sub handler {
|
<body bgcolor="#FFFFFF"> |
<body bgcolor="#FFFFFF"> |
<script> |
<script> |
parent.chatout.document.writeln('$newstuff'); |
parent.chatout.document.writeln('$newstuff'); |
|
parent.chatout.scroll(0,10000000); |
</script> |
</script> |
</body> |
</body> |
</html> |
</html> |