version 1.63, 2008/01/16 17:13:57
|
version 1.64, 2008/07/11 14:55:21
|
Line 149 sub handler {
|
Line 149 sub handler {
|
foreach (split(/\,/,$coursepersonnel{$element})) { |
foreach (split(/\,/,$coursepersonnel{$element})) { |
my ($puname,$pudom)=split(/\:/,$_); |
my ($puname,$pudom)=split(/\:/,$_); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print(' '.&Apache::loncommon::aboutmewrapper( |
my $courseperson = &Apache::loncommon::plainname($puname,$pudom); |
&Apache::loncommon::plainname($puname, |
if (($env{'user.name'} eq '') || ($env{'user.name'} eq 'public') || |
$pudom),$puname,$pudom)); |
($env{'user.domain'} eq '') || ($env{'user.domain'} eq 'public')) { |
|
$r->print(' '.$courseperson); |
|
} else { |
|
$r->print(' '.&Apache::loncommon::aboutmewrapper($courseperson), |
|
$puname,$pudom); |
|
} |
} else { |
} else { |
$r->print(' '.&Apache::loncommon::plainname($puname, |
$r->print(' '.&Apache::loncommon::plainname($puname, |
$pudom).' '); |
$pudom).' '); |