|
version 1.67, 2002/09/13 20:46:09
|
version 1.68, 2002/09/14 21:01:38
|
|
Line 981 sub nickname {
|
Line 981 sub nickname {
|
| my ($uname,$udom)=@_; |
my ($uname,$udom)=@_; |
| my %names=&Apache::lonnet::get('environment', |
my %names=&Apache::lonnet::get('environment', |
| ['nickname','firstname','middlename','lastname','generation'],$udom,$uname); |
['nickname','firstname','middlename','lastname','generation'],$udom,$uname); |
| my $name=&Apache::lonnet::unescape($names{'nickname'}); |
my $name=$names{'nickname'}; |
| if ($name) { |
if ($name) { |
| $name='"'.$name.'"'; |
$name='"'.$name.'"'; |
| } else { |
} else { |
|
Line 1000 sub screenname {
|
Line 1000 sub screenname {
|
| my ($uname,$udom)=@_; |
my ($uname,$udom)=@_; |
| my %names= |
my %names= |
| &Apache::lonnet::get('environment',['screenname'],$udom,$uname); |
&Apache::lonnet::get('environment',['screenname'],$udom,$uname); |
| return &Apache::lonnet::unescape($names{'screenname'}); |
return $names{'screenname'}; |
| } |
} |
| |
|
| # ------------------------------------------------------------- Message Wrapper |
# ------------------------------------------------------------- Message Wrapper |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface