--- loncom/homework/bridgetask.pm 2006/02/09 22:34:35 1.105 +++ loncom/homework/bridgetask.pm 2006/02/09 23:02:51 1.106 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.105 2006/02/09 22:34:35 albertel Exp $ +# $Id: bridgetask.pm,v 1.106 2006/02/09 23:02:51 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -188,20 +188,23 @@ sub add_grading_button { $result.=''; if (&Apache::lonnet::allowed('mgq',$env{'request.course.id'})) { my ($entries,$ready,$locks)=&get_queue_counts('gradingqueue'); - $result.='

Specify a section: '.$sec_select.'

'; - $result.='

'.&mt("Grading Queue has [_1] entries. [_2] of them are ready to be graded and [_3] of them are currently being graded",$entries,$ready,$locks); + $result.=''; + $result.=''; + $result.=''."\n"; ($entries,$ready,$locks)=&get_queue_counts('reviewqueue'); - $result.='

'.&mt("Review Queue has [_1] entries. [_2] of them are ready to be graded and [_3] of them are currently being graded",$entries,$ready,$locks); - $result.='

'."\n"; - $result.='

'."\n"; + $result.=''."\n"; + $result.='
Specify a section: '.$sec_select.''.' '; - $result.='

'."\n"; + $result.= &mt("[_1] entries, [_2] ready, [_3] being graded",$entries,$ready,$locks);'
'. + ' '; + $result.=&mt("[_1] entries, [_2] ready, [_3] being graded", + $entries,$ready,$locks).'
'."\n"; $result.='

'."\n"; + &mt("Regrade specific user:").'" />'."\n"; $result.=''; $result.=&Apache::loncommon::select_dom_form($env{'user.domain'}, 'gradingdomain');