loncom/homework/randomlabel.pm - diff

Return to randomlabel.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.93, 2008/11/25 13:16:17	version 1.94, 2008/12/19 14:28:14
Line 172 sub start_randomlabel {	Line 172 sub start_randomlabel {
$label_xscale = 1.0; # Assume image size not overridden.	$label_xscale = 1.0; # Assume image size not overridden.
$label_yscale = 1.0;	$label_yscale = 1.0;
my $bgimg= &Apache::lonxml::get_param('bgimg',$parstack,$safeeval);	my $bgimg= &Apache::lonxml::get_param('bgimg',$parstack,$safeeval);
if ( defined($bgimg) && $bgimg !~ /^http:/ ) {	if ( defined($bgimg) && $bgimg !~ /^https?\:/ ) {
$bgimg=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$bgimg);	$bgimg=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$bgimg);
if (&Apache::lonnet::repcopy($bgimg) ne 'ok') {	if (&Apache::lonnet::repcopy($bgimg) ne 'ok') {
$bgimg='/home/httpd/html/adm/lonKaputt/lonlogo_broken.gif';	$bgimg='/home/httpd/html/adm/lonKaputt/lonlogo_broken.gif';