--- loncom/homework/structuretags.pm 2002/10/17 17:34:10 1.128 +++ loncom/homework/structuretags.pm 2002/11/03 19:16:19 1.130 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.128 2002/10/17 17:34:10 albertel Exp $ +# $Id: structuretags.pm,v 1.130 2002/11/03 19:16:19 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -141,7 +141,7 @@ sub problem_edit_header {
-
+

 

'; } @@ -634,7 +634,9 @@ sub start_part { } } else { if ($target eq 'tex') { - $result='\noindent \end{minipage}\vskip 0 mm \noindent \begin{minipage}{\textwidth}\noindent'; + if ($$tagstack[-2] ne 'problem') { + $result.='\noindent \end{minipage}\vskip 0 mm \noindent \begin{minipage}{\textwidth}\noindent'; + } } } } @@ -756,7 +758,9 @@ sub start_endouttext { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $result=''; if ($target eq "edit" ) { $result="".&Apache::edit::end_table()."\n"; } - if ($target eq "modified") { $result=''; } + if ($target eq "modified") { + $result=''. + &Apache::edit::handle_insertafter('startouttext'); } return $result; } sub end_endouttext {