--- loncom/interface/lonchatfetch.pm 2006/05/30 12:46:08 1.25 +++ loncom/interface/lonchatfetch.pm 2006/06/27 00:01:15 1.26 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.25 2006/05/30 12:46:08 www Exp $ +# $Id: lonchatfetch.pm,v 1.26 2006/06/27 00:01:15 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -107,6 +107,11 @@ sub handler { {'only_body' => 1, 'bgcolor' => '#FFFFFF', 'js_ready' => 1,}); + # removing the CSS reference for now + # see BUG# 4839 + # to fix, need to either write the whole webpage to the bottom frame + # everytime or store the page in a js variable somewhere. + $newstuff =~ s|()||; } my @participants=(); foreach (@entries) { @@ -159,10 +164,10 @@ sub handler { $color=substr($color,0,6); my $timestamp=localtime($msgtime); my ($mhour,$mmin,$msec)=($timestamp=~/(\d\d)\:(\d\d)\:(\d\d)/); - $newstuff.=''. + $newstuff.=''. $sender.' ('.$mhour.':'.$mmin.':'.$msec.'): '. - $contrib."
"; - $bottomid=$id; + $contrib."

"; + $bottomid='LC_'.$id; } else { $_=~/^(\w+)/; if ($1 eq $env{'form.lastid'}) { $include=1; } @@ -171,7 +176,7 @@ sub handler { my $participant_output=join('
',sort @participants); my $refresh_cmd = "/adm/chatfetch?lastid=$lastid"; if (defined($group)) { - $refresh_cmd .= "&group=$group"; + $refresh_cmd .= "&group=$group"; } my $start_page = &Apache::loncommon::start_page('Chat',undef,