--- loncom/interface/lonhtmlcommon.pm 2005/10/14 18:28:26 1.115
+++ loncom/interface/lonhtmlcommon.pm 2005/10/27 23:18:21 1.117
@@ -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.117 2005/10/27 23:18:21 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;
}
@@ -1435,7 +1440,10 @@ sub course_select_row {
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;
}