version 1.108, 2005/07/07 04:32:59
|
version 1.109, 2005/07/08 17:32:06
|
Line 3402 sub render {
|
Line 3402 sub render {
|
} else { |
} else { |
# FIXME: This is probably wasteful! Store the name! |
# FIXME: This is probably wasteful! Store the name! |
my $classlist = Apache::loncoursedata::get_classlist(); |
my $classlist = Apache::loncoursedata::get_classlist(); |
my $username = $vars->{USER_NAME}; |
my ($uname,$udom)=split(':',$vars->{USER_NAME}); |
# Chop off everything after the last colon (section) |
|
my ($uname,$udom)=split(':',$username); |
|
my $name = $classlist->{$uname.':'.$udom}->[6]; |
my $name = $classlist->{$uname.':'.$udom}->[6]; |
$result .= '<li>'.&mt('for [_1]',"<b>$name</b>").'</li>'; |
$result .= '<li>'.&mt('for [_1]',"<b>$name</b>").'</li>'; |
my ($uname, $udom) = split /:/, $vars->{USER_NAME}; |
|
$result .= "<input type='hidden' name='uname' value='". |
$result .= "<input type='hidden' name='uname' value='". |
HTML::Entities::encode($uname,"'<>&\"") . "' />\n"; |
HTML::Entities::encode($uname,"'<>&\"") . "' />\n"; |
$result .= "<input type='hidden' name='udom' value='". |
$result .= "<input type='hidden' name='udom' value='". |