|
version 1.208, 2003/08/02 13:57:05
|
version 1.208.2.1, 2003/08/13 19:52:05
|
|
Line 465 sub page_format {
|
Line 465 sub page_format {
|
| sub get_name { |
sub get_name { |
| my ($uname,$udom)=@_; |
my ($uname,$udom)=@_; |
| if (!defined($uname)) { $uname=$ENV{'user.name'}; } |
if (!defined($uname)) { $uname=$ENV{'user.name'}; } |
| if (!defined($udom)) { $uname=$ENV{'user.domain'}; } |
if (!defined($udom)) { $udom=$ENV{'user.domain'}; } |
| my $plainname=&Apache::loncommon::plainname($uname,$udom); |
my $plainname=&Apache::loncommon::plainname($uname,$udom); |
| if ($plainname=~/^\s*$/) { $plainname=$uname; } |
if ($plainname=~/^\s*$/) { $plainname=$uname; } |
| return &Apache::lonxml::latex_special_symbols($plainname,undef,undef, |
return &Apache::lonxml::latex_special_symbols($plainname,undef,undef, |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonprintout.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface