version 1.403, 2006/04/11 14:07:33
|
version 1.405, 2006/04/13 18:35:17
|
Line 204 sub xmlend {
|
Line 204 sub xmlend {
|
$discussion.='<tex>\keephidden{ENDOFPROBLEM}\vskip 0.5mm\noindent\makebox[\textwidth/$number_of_columns][b]{\hrulefill}\end{document}</tex>'; |
$discussion.='<tex>\keephidden{ENDOFPROBLEM}\vskip 0.5mm\noindent\makebox[\textwidth/$number_of_columns][b]{\hrulefill}\end{document}</tex>'; |
&Apache::lonxml::newparser($parser,\$discussion,''); |
&Apache::lonxml::newparser($parser,\$discussion,''); |
return ''; |
return ''; |
} else { |
|
return $discussion.&Apache::loncommon::endbodytag(); |
|
} |
} |
|
|
|
return $discussion.&Apache::loncommon::end_page(); |
} |
} |
|
|
sub tokeninputfield { |
sub tokeninputfield { |
Line 1580 sub error {
|
Line 1580 sub error {
|
#public or browsers |
#public or browsers |
$errormsg=&mt("An error occured while processing this resource. The author has been notified."); |
$errormsg=&mt("An error occured while processing this resource. The author has been notified."); |
} |
} |
my $msg = join('<br />',@_)." <p>this error occurred on machine ". |
my $msg = join('<br />',@_); |
$perlvar{'lonHostID'}."</p>"; |
|
#notify author |
#notify author |
&Apache::lonmsg::author_res_msg($env{'request.filename'},$msg); |
&Apache::lonmsg::author_res_msg($env{'request.filename'},$msg); |
#notify course |
#notify course |