version 1.35, 2004/10/26 15:03:08
|
version 1.36, 2004/11/12 21:15:05
|
Line 194 sub start_displaystudentphoto {
|
Line 194 sub start_displaystudentphoto {
|
if ($width) { $args.=" width=\"$width\" "; } |
if ($width) { $args.=" width=\"$width\" "; } |
my $height=&Apache::lonxml::get_param('heigth',$parstack,$safeeval); |
my $height=&Apache::lonxml::get_param('heigth',$parstack,$safeeval); |
if ($height) { $args.=" height=\"$height\" "; } |
if ($height) { $args.=" height=\"$height\" "; } |
|
my $align=&Apache::lonxml::get_param('align',$parstack,$safeeval); |
|
if ($align) { $args.=" align=\"$align\" "; } |
$result.=" <img $args src=\"$tokenurl\" alt=\"$user\@$domain\" />"; |
$result.=" <img $args src=\"$tokenurl\" alt=\"$user\@$domain\" />"; |
} |
} |
if ($target eq 'tex' && $ENV{'request.role'} =~ /^cc/) { |
if ($target eq 'tex' && $ENV{'request.role'} =~ /^cc/) { |
Line 211 sub start_displaystudentphoto {
|
Line 213 sub start_displaystudentphoto {
|
my $width_param=&Apache::londefdef::image_size($Apache::lonnet::perlvar{'lonPrtDir'}."/$file",'0.3',$parstack,$safeeval); |
my $width_param=&Apache::londefdef::image_size($Apache::lonnet::perlvar{'lonPrtDir'}."/$file",'0.3',$parstack,$safeeval); |
$result.=' \graphicspath{{'.$Apache::lonnet::perlvar{'lonPrtDir'}. |
$result.=' \graphicspath{{'.$Apache::lonnet::perlvar{'lonPrtDir'}. |
'}}\includegraphics[width='.$width_param.' mm]{'.$file.'} '; |
'}}\includegraphics[width='.$width_param.' mm]{'.$file.'} '; |
|
} else { |
|
$result="$user\@$domain"; |
} |
} |
} |
} |
return $result; |
return $result; |