--- loncom/homework/structuretags.pm 2007/04/07 00:12:43 1.376 +++ loncom/homework/structuretags.pm 2007/05/23 22:36:21 1.377 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.376 2007/04/07 00:12:43 albertel Exp $ +# $Id: structuretags.pm,v 1.377 2007/05/23 22:36:21 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -792,7 +792,6 @@ sub start_problem { $result.=$temp; } elsif ($target eq 'modified') { $result=$token->[4]; - $result.=&Apache::edit::handle_insert(); } else { # page_start returned a starting result, delete it if we don't need it $result = ''; @@ -969,7 +968,6 @@ sub end_problem { $result .= &problem_edit_footer(); } elsif ($target eq 'modified') { $result .= $token->[2]; - $result.=&Apache::edit::handle_insertafter($token->[1]); } if ($env{'request.state'} eq 'construct' && $target eq 'web') { @@ -998,7 +996,6 @@ sub start_library { $result.=$temp; } elsif ($target eq 'modified') { $result=$token->[4]; - $result.=&Apache::edit::handle_insert(); } elsif (($target eq 'web' || $target eq 'webgrade') && ($#$tagstack eq 0 && $$tagstack[0] eq 'library') && $env{'request.state'} eq "construct" ) { @@ -1445,7 +1442,6 @@ sub start_part { #limiting ids to only letters numbers, and space $token->[2]->{'id'}=~s/[^A-Za-z0-9 ]//gs; $result = &Apache::edit::rebuild_tag($token); - $result.=&Apache::edit::handle_insert(); } } return $result; @@ -1483,7 +1479,6 @@ sub end_part { $result.=&Apache::edit::end_table(); } elsif ($target eq 'modified') { $result .= $token->[2]; - $result.=&Apache::edit::handle_insertafter($token->[1]); } pop @Apache::inputtags::status; $Apache::inputtags::part=''; @@ -1652,7 +1647,8 @@ sub start_endouttext { if ($target eq "edit" ) { $result="".&Apache::edit::end_table()."\n"; } if ($target eq "modified") { $result=''. - &Apache::edit::handle_insertafter('startouttext'); } + &Apache::edit::handle_insertafter('startouttext'); + } return $result; }