--- loncom/interface/loncreateuser.pm 2007/12/21 20:34:26 1.221
+++ loncom/interface/loncreateuser.pm 2007/12/21 21:02:10 1.222
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.221 2007/12/21 20:34:26 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.222 2007/12/21 21:02:10 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -3561,48 +3561,49 @@ $table.
sub course_level_row {
my ($protectedcourse,$role,$area,$domain,$plrole,$sections_count,$lt) = @_;
- my $table = &Apache::loncommon::start_data_table_row().
- '
| '."\n".
- ' '.$plrole.' | '."\n".
- ''.$area.' Domain: '.$domain.' | '."\n";
+ my $row = &Apache::loncommon::start_data_table_row().
+ ' | '."\n".
+ ' '.$plrole.' | '."\n".
+ ' '.$area.' Domain: '.$domain.' | '."\n";
if ($role eq 'cc') {
- $table .= '  | ';
+ $row .= ' | ';
} elsif ($env{'request.course.sec'} ne '') {
- $table .= ' '.
- $env{'request.course.sec'}.' | ';
+ $row .= ' '.
+ $env{'request.course.sec'}.' | ';
} else {
if (ref($sections_count) eq 'HASH') {
my $currsec =
&Apache::lonuserutils::course_sections($sections_count,
$protectedcourse.'_'.$role);
- $table .= ''.
- '
- '.$lt->{'exs'}.' '.
- $currsec.' |
- |
- '.$lt->{'new'}.' '.
+ $row .= ' | | ';
+ ' | '."\n";
} else {
- $table .= ' | ';
+ $row .= ' | '."\n";
}
}
- $table .= <
+ $row .= <
$lt->{'ssd'}
-
+ |
$lt->{'sed'} |
ENDTIMEENTRY
- $table.= &Apache::loncommon::end_data_table_row();
+ $row .= &Apache::loncommon::end_data_table_row();
+ return $row;
}
sub course_level_dc {