--- loncom/interface/lonchatfetch.pm 2004/06/27 17:36:57 1.14 +++ loncom/interface/lonchatfetch.pm 2005/02/17 08:29:42 1.15 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.14 2004/06/27 17:36:57 www Exp $ +# $Id: lonchatfetch.pm,v 1.15 2005/02/17 08:29:42 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -86,7 +86,8 @@ sub handler { my $bottomid=''; unless ($ENV{'form.lastid'}) { $include=1; - $newstuff='
'; + my $html=&Apache::lonxml::xmlbegin(); + $newstuff=$html.''; } my @participants=(); foreach (@entries) { @@ -149,8 +150,9 @@ sub handler { } } my $participant_output=join('