--- loncom/homework/bridgetask.pm 2006/03/29 04:53:42 1.127 +++ loncom/homework/bridgetask.pm 2006/03/31 20:31:38 1.128.2.6 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.127 2006/03/29 04:53:42 albertel Exp $ +# $Id: bridgetask.pm,v 1.128.2.6 2006/03/31 20:31:38 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -455,11 +455,7 @@ sub start_Task { my $files = ''; @@ -974,7 +970,7 @@ DONEBUTTON &Apache::structuretags::finalize_storage(); } } elsif ($target eq 'webgrade') { - $result.="\n
"; + $result.=""; #$result.=' '; #$result.=''."\n". - ''."\n". - ''."\n". - '
'."\n"; + '
'."\n"; @Apache::scripttag::parser_env = @_; $result.=&Apache::scripttag::xmlparse($dimension{$instance.'.criteria.'.$id}); $result.='
'."\n". @@ -1874,7 +1868,7 @@ sub start_IntroParagraph { if ($tagstack->[-2] eq 'Dimension') { $dimension{'intro'}=&Apache::lonxml::get_all_text('/introparagraph',$parser,$style); - } elsif ($target eq 'webgrade') { + } elsif ($tagstack->[-2] eq 'Task' && $target eq 'webgrade') { &Apache::lonxml::startredirection(); } @@ -1884,7 +1878,7 @@ sub start_IntroParagraph { sub end_IntroParagraph { my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; - if ($target eq 'webgrade') { + if ($tagstack->[-2] eq 'Task' && $target eq 'webgrade') { my $result = &Apache::lonxml::endredirection(); } }