--- loncom/homework/structuretags.pm 2002/05/24 21:57:38 1.95 +++ loncom/homework/structuretags.pm 2002/06/25 14:50:53 1.98 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.95 2002/05/24 21:57:38 albertel Exp $ +# $Id: structuretags.pm,v 1.98 2002/06/25 14:50:53 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,9 +201,9 @@ sub start_problem { #should get back a or the neccesary stuff to start XML/MathML my ($result,$head_tag_start,$body_tag_start)= &page_start($target,$token,$tagstack,$parstack,$parser,$safeeval); + if ($target eq 'tex' and $ENV{'request.symb'} =~ m/\.page_/) { $result = '';} - - if ($target eq 'web' || $target eq 'grade' || $target eq 'answer') { + if ($target eq 'web' || $target eq 'grade' || $target eq 'answer' || $target eq 'tex') { #handle exam checkout if ($Apache::lonhomework::type eq 'exam') { my $token=$Apache::lonhomework::history{"resource.0.outtoken"}; @@ -283,25 +283,33 @@ sub start_problem { $result.=$head_tag_start. "$name\n$body_tag_start\n"; } - } + } elsif ($target eq 'tex') { + my $id = $Apache::inputtags::part; + my $duedate = &Apache::lonnet::EXT("resource.$id.duedate"); + $duedate = POSIX::strftime("%c",localtime($duedate)); + if (not $ENV{'request.symb'} =~ m/\.page_/) { + $result .= '\begin{document} \noindent\fbox{Due date: '.$duedate.'} \\vskip 1 mm'; + } else { + $result .= '\begin{minipage}{\minipagewidth} '; + } + } } elsif ($target eq 'edit') { $result.=$head_tag_start."".$body_tag_start. '
- +
-
+ +
'; my $temp=&Apache::edit::insertlist($target,$token); $result.=$temp; } elsif ($target eq 'modified') { $result=$token->[4]; $result.=&Apache::edit::handle_insert(); - } elsif ($target eq 'tex') { - $result .= '\begin{document} '; } else { # page_start returned a starting result, delete it if we don't need it $result = ''; @@ -345,9 +353,15 @@ sub end_problem { } } elsif ($target eq 'edit') { &Apache::lonxml::debug("in end_problem with $target, edit"); - $result='
'; + $result ='
'; + $result.=''; } elsif ($target eq 'tex') { - $result .= '\vskip 0.5mm\noindent\makebox[9.0cm][b]{\hrulefill}\end{document}'; + $result .= '\vskip 0.5mm\noindent\makebox[9.0cm][b]{\hrulefill}'; + if (not $ENV{'request.symb'} =~ m/\.page_/) { + $result .= '\end{document} '; + } else { + $result .= '\end{minipage} '; + } } return $result; }