--- loncom/homework/bridgetask.pm 2005/10/01 03:55:06 1.60 +++ loncom/homework/bridgetask.pm 2005/10/01 04:06:29 1.62 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.60 2005/10/01 03:55:06 albertel Exp $ +# $Id: bridgetask.pm,v 1.62 2005/10/01 04:06:29 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -478,7 +478,9 @@ sub start_Task { my $bodytext=&Apache::lonxml::get_all_text("/task",$parser); } if ($target eq 'webgrade' && defined($env{'form.queue'})) { - $result.=&submission_time_stamp(); + if ($webgrade eq 'yes') { + $result.=&submission_time_stamp(); + } $result.=$form_tag_start; $result.=''; @@ -488,6 +490,14 @@ sub start_Task { $result.=''; } + if ($env{'form.chosensections'}) { + my @chosen_sections= + &Apache::loncommon::get_env_multiple('form.chosensections'); + foreach my $sec (@chosen_sections) { + $result.=''; + } + } } } else { # page_start returned a starting result, delete it if we don't need it @@ -957,6 +967,11 @@ sub show_queue { ($action,$description)=('unlock',&mt('Unlock')); } } + my $seclist; + foreach my $sec (@chosen_sections) { + $seclist.=''; + } if (time > $slot_data{'endtime'}) { $result.=(< @@ -967,6 +982,7 @@ sub show_queue { + $seclist FORM @@ -1202,6 +1218,11 @@ sub select_user { $result.=' '.$fullname->{$student}. ''; } else { + my $seclist; + foreach my $sec (@chosen_sections) { + $seclist.=''; + } $result.=< @@ -1210,7 +1231,8 @@ sub select_user { - + + $seclist $fullname->{$student}