--- loncom/interface/lonchatfetch.pm 2006/03/19 22:48:53 1.19 +++ loncom/interface/lonchatfetch.pm 2006/03/23 22:32:10 1.20 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.19 2006/03/19 22:48:53 albertel Exp $ +# $Id: lonchatfetch.pm,v 1.20 2006/03/23 22:32:10 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -85,9 +85,12 @@ sub handler { my $newstuff=''; my $bottomid=''; unless ($env{'form.lastid'}) { - $include=1; - my $html=&Apache::lonxml::xmlbegin(); - $newstuff=$html.''; + $include=1; + $newstuff .= + &Apache::loncommon::start_page(undef,undef, + {'only_body' => 1, + 'bgcolor' => '#FFFFFF', + 'js_ready' => 1,}); } my @participants=(); foreach (@entries) {