--- loncom/homework/structuretags.pm 2003/03/07 23:41:29 1.155 +++ loncom/homework/structuretags.pm 2003/04/02 20:52:25 1.158 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.155 2003/03/07 23:41:29 albertel Exp $ +# $Id: structuretags.pm,v 1.158 2003/04/02 20:52:25 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -254,6 +254,7 @@ sub start_problem { $Apache::inputtags::part='0'; @Apache::inputtags::responselist = (); @Apache::inputtags::previous=(); + @Apache::inputtags::previous_version=(); $Apache::structuretags::printanswer='No'; if ($target ne 'analyze') { &initialize_storage(); @@ -434,7 +435,7 @@ sub end_problem { # if part is zero, no s existed, so we need show the current # grading status my $gradestatus = &Apache::inputtags::gradestatus($Apache::inputtags::part,$target); - if ($Apache::lonhomework::type ne 'exam') {$result.= $gradestatus;} + $result.= $gradestatus; } if ( (($target eq 'web') && ($ENV{'request.state'} ne 'construct')) || @@ -686,6 +687,7 @@ sub start_part { $Apache::inputtags::part=$id; @Apache::inputtags::responselist = (); @Apache::inputtags::previous=(); + @Apache::inputtags::previous_version=(); my $hidden=&Apache::loncommon::check_if_partid_hidden($Apache::inputtags::part); if ($target eq 'meta') {