--- loncom/homework/structuretags.pm 2002/08/07 17:24:35 1.103 +++ loncom/homework/structuretags.pm 2002/11/06 22:58:36 1.131 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.103 2002/08/07 17:24:35 sakharuk Exp $ +# $Id: structuretags.pm,v 1.131 2002/11/06 22:58:36 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -101,7 +101,75 @@ sub page_start { } $body_tag_start.='>'; } - return ($result,$head_tag_start,$body_tag_start); + my $form_tag_start; + if (!defined($found{'form'})) { + $form_tag_start='