--- loncom/interface/lonhtmlcommon.pm 2005/10/14 18:28:26 1.115 +++ loncom/interface/lonhtmlcommon.pm 2005/11/15 20:46:40 1.118 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.115 2005/10/14 18:28:26 albertel Exp $ +# $Id: lonhtmlcommon.pm,v 1.118 2005/11/15 20:46:40 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1333,7 +1333,10 @@ ENDTWO sub role_select_row { my ($roles,$col_width,$tablecolor,$title) = @_; - my $output = &row_title($col_width,$tablecolor,$title); + my $output; + if (defined($title)) { + $output = &row_title($col_width,$tablecolor,$title); + } $output .= qq| \n|; - $output .= &row_closure(); + if (defined($title)) { + $output .= &row_closure(); + } return $output; } @@ -1382,7 +1387,7 @@ sub course_select_row { |; my $courseform=''.&Apache::loncommon::selectcourse_link - ($formname,'pickcourse','pickdomain','coursedesc').''; + ($formname,'pickcourse','pickdomain','coursedesc','',1).''; if ($totcodes > 0) { $output .= ''.&mt('All courses'); my $numtitles = @$codetitles; @@ -1428,14 +1433,17 @@ sub course_select_row { $output .= '
'; } } - $output .= ''.&mt('Pick specific course(s):').' '.$courseform.'  selected.
'."\n"; + $output .= ''.&mt('Pick specific course(s):').' '.$courseform.'  selected.
'."\n"; $output .= &row_closure(); return $output; } sub status_select_row { my ($types,$col_width,$tablecolor,$title) = @_; - my $output = &row_title($col_width,$tablecolor,$title); + my $output; + if (defined($title)) { + $output = &row_title($col_width,$tablecolor,$title); + } $output .= qq| \n|; - $output .= &row_closure(); + if (defined($title)) { + $output .= &row_closure(); + } return $output; }