--- loncom/xml/lonxml.pm 2006/04/11 14:07:33 1.403
+++ loncom/xml/lonxml.pm 2006/04/13 18:35:17 1.405
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# XML Parser Module
#
-# $Id: lonxml.pm,v 1.403 2006/04/11 14:07:33 albertel Exp $
+# $Id: lonxml.pm,v 1.405 2006/04/13 18:35:17 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -204,9 +204,9 @@ sub xmlend {
$discussion.='\keephidden{ENDOFPROBLEM}\vskip 0.5mm\noindent\makebox[\textwidth/$number_of_columns][b]{\hrulefill}\end{document}';
&Apache::lonxml::newparser($parser,\$discussion,'');
return '';
- } else {
- return $discussion.&Apache::loncommon::endbodytag();
}
+
+ return $discussion.&Apache::loncommon::end_page();
}
sub tokeninputfield {
@@ -1580,8 +1580,7 @@ sub error {
#public or browsers
$errormsg=&mt("An error occured while processing this resource. The author has been notified.");
}
- my $msg = join('
',@_)."
this error occurred on machine ".
- $perlvar{'lonHostID'}."
";
+ my $msg = join('
',@_);
#notify author
&Apache::lonmsg::author_res_msg($env{'request.filename'},$msg);
#notify course