loncom/interface/londropadd.pm - diff

Return to londropadd.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.134, 2006/02/07 05:08:32	version 1.135, 2006/02/07 16:21:26
Line 1340 function photowindow(photolink) {	Line 1340 function photowindow(photolink) {
</th>	</th>
END	END
if ($env{'course.'.$env{'request.course.id'}.'.internal.showphotos'}) {	if ($env{'course.'.$env{'request.course.id'}.'.internal.showphotos'}) {
my %photo_options = &Apache::lonlocal::texthash (	my %photo_options = &Apache::lonlocal::texthash(
'on' => 'Show',	'on' => 'Show',
'off' => 'Hide',	'off' => 'Hide',
);	);
Line 1494 END	Line 1494 END
<td>$end</td>	<td>$end</td>
END	END
if ($env{'course.'.$env{'request.course.id'}.	if ($env{'course.'.$env{'request.course.id'}.
'.internal.showphotos'}) {	'.internal.showphotos'}) {
if ($displayphotos eq 'on') {	if ($displayphotos eq 'on') {
my $imgurl = &Apache::lonnet::retrievestudentphoto($domain,	my $imgurl =
$username,'gif','thumbnail');	&Apache::lonnet::retrievestudentphoto($domain,
	$username,'gif',
	'thumbnail');

$r->print(' <td align="right"><a href="javascript:photowindow('."'".&Apache::lonnet::studentphoto($domain,$username,'jpg')."'".')"><img src="'.$imgurl.'" border="1"></a></td>');	$r->print(' <td align="right"><a href="javascript:photowindow('."'".&Apache::lonnet::studentphoto($domain,$username,'jpg')."'".')"><img src="'.$imgurl.'" border="1"></a></td>');
} else {	} else {