--- loncom/homework/randomlabel.pm 2008/12/21 15:10:12 1.91.2.1 +++ loncom/homework/randomlabel.pm 2008/11/18 19:14:28 1.92 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # random labelling tool # -# $Id: randomlabel.pm,v 1.91.2.1 2008/12/21 15:10:12 raeburn Exp $ +# $Id: randomlabel.pm,v 1.92 2008/11/18 19:14:28 jms Exp $ # # Copyright Michigan State University Board of Trustees # @@ -53,6 +53,7 @@ # (32,65) : $GroupTwo[1] = "TEXT-1" # (21,54) : $GroupTwo[2] = "TEXT-2" # =========================================== + package Apache::randomlabel; use Apache::lonnet; use strict; @@ -130,7 +131,7 @@ sub start_randomlabel { $label_xscale = 1.0; # Assume image size not overridden. $label_yscale = 1.0; my $bgimg= &Apache::lonxml::get_param('bgimg',$parstack,$safeeval); - if ( defined($bgimg) && $bgimg !~ /^https?\:/ ) { + if ( defined($bgimg) && $bgimg !~ /^http:/ ) { $bgimg=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$bgimg); if (&Apache::lonnet::repcopy($bgimg) ne 'ok') { $bgimg='/home/httpd/html/adm/lonKaputt/lonlogo_broken.gif';