--- loncom/homework/bridgetask.pm 2006/03/28 18:57:49 1.121 +++ loncom/homework/bridgetask.pm 2006/03/31 20:29:56 1.135 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.121 2006/03/28 18:57:49 albertel Exp $ +# $Id: bridgetask.pm,v 1.135 2006/03/31 20:29:56 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -176,10 +176,10 @@ sub add_grading_button { if (scalar(keys(%sections)) < 3) { $size=scalar(keys(%sections))+2; } - my $sec_select = '
'; } return $result; } @@ -258,64 +259,14 @@ sub preserve_grade_info { } sub style { - return (< + my ($target) = @_; + if ($target eq 'web' + || $target eq 'webgrade') { + return (< STYLE - + } + return; } sub show_task { @@ -428,7 +379,15 @@ sub start_Task { my ($result,$head_tag_start,$body_tag_start,$form_tag_start)= &Apache::structuretags::page_start($target,$token,$tagstack,$parstack,$parser,$safeeval); + $head_tag_start .= &style($target); $body_tag_start .= '