--- loncom/homework/structuretags.pm 2002/11/06 23:05:02 1.132 +++ loncom/homework/structuretags.pm 2002/11/07 16:10:47 1.133 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.132 2002/11/06 23:05:02 albertel Exp $ +# $Id: structuretags.pm,v 1.133 2002/11/07 16:10:47 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -29,6 +29,7 @@ # 6/26/2001 fixed extra web display at end of tags # 8/17,8/18,8/20 Gerd Kortemeyer + package Apache::structuretags; use strict; @@ -681,7 +682,8 @@ sub start_preduedate { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; if ($target eq 'web' || $target eq 'grade' || $target eq 'answer' || $target eq 'tex') { if ($Apache::inputtags::status['-1'] ne 'CAN_ANSWER' && - $Apache::inputtags::status['-1'] ne 'CANNOT_ANSWER' ) { + $Apache::inputtags::status['-1'] ne 'CANNOT_ANSWER' && + $Apache::inputtags::status['-1'] ne 'SHOW_ANSWER') { &Apache::lonxml::get_all_text("/preduedate",$$parser[$#$parser]); } }