|
version 1.403, 2006/04/11 14:07:33
|
version 1.407, 2006/04/18 20:43:47
|
|
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; |
| } |
} |
| |
|
| sub tokeninputfield { |
sub tokeninputfield { |
|
Line 1505 ENDNOTFOUND
|
Line 1505 ENDNOTFOUND
|
| my %options = (); |
my %options = (); |
| if ($env{'environment.remote'} ne 'off') { |
if ($env{'environment.remote'} ne 'off') { |
| $options{'bgcolor'} = '#FFFFFF'; |
$options{'bgcolor'} = '#FFFFFF'; |
| $options{'only_body'} = 1; |
|
| } |
} |
| my $start_page = &Apache::loncommon::start_page(undef,undef, |
my $start_page = &Apache::loncommon::start_page(undef,undef, |
| \%options); |
\%options); |
|
Line 1580 sub error {
|
Line 1579 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 |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml