--- loncom/homework/structuretags.pm 2002/08/20 14:42:22 1.104 +++ loncom/homework/structuretags.pm 2002/09/23 17:25:24 1.116 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.104 2002/08/20 14:42:22 sakharuk Exp $ +# $Id: structuretags.pm,v 1.116 2002/09/23 17:25:24 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -101,7 +101,68 @@ 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='