--- loncom/homework/bridgetask.pm 2006/11/02 22:23:06 1.189 +++ loncom/homework/bridgetask.pm 2006/11/02 23:25:40 1.190 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.189 2006/11/02 22:23:06 albertel Exp $ +# $Id: bridgetask.pm,v 1.190 2006/11/02 23:25:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2211,33 +2211,6 @@ sub get_criteria { $result.=$dimension{$id}{'result'}; next; } - my $status= &get_criteria('status', $version,$dim,$id); - my $comment=&get_criteria('comment',$version,$dim,$id); - my $mandatory=($dimension{$dim}{'criteria.'.$id.'.mandatory'} ne 'N'); - if ($mandatory) { - $mandatory='Mandatory'; - } else { - $mandatory='Optional'; - } - if ($status eq 'fail') { - } elsif ($status eq 'pass') { - } else { - &Apache::lonxml::error("Student viewing a graded bridgetask was shown a status of $status"); - } - my $status_display=$status; - $status_display=~s/^([a-z])/uc($1)/e; - $result.= - '
'; - $result.= - &nested_parse(\$dimension{$dim}{'criteria.'.$id}, - [@_],{'set_dim_id' => $id}); - $result.='
'.$status_display.'
'; - if ($comment) { - $result.=''. - &mt('Comment: [_1]',$comment).'
'; - } - $result.=''; + $result.= + &nested_parse(\$dimension{$dim}{'criteria.'.$id},[@_]); + $result.='
'.$status_display.'
'; + if ($comment) { + $result.=''. + &mt('Comment: [_1]',$comment).'
'; + } + $result.='