--- loncom/homework/randomlabel.pm 2004/01/08 20:28:20 1.55 +++ loncom/homework/randomlabel.pm 2004/01/09 00:53:19 1.56 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # random labelling tool # -# $Id: randomlabel.pm,v 1.55 2004/01/08 20:28:20 albertel Exp $ +# $Id: randomlabel.pm,v 1.56 2004/01/09 00:53:19 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -107,7 +107,7 @@ sub start_randomlabel { my $newbgimg = $bgimg; $bgimg=~s/\.(gif|jpg|png|jpeg)$/\.eps/i; $bgimg= &Apache::lonnet::filelocation($bgimg); - $bgimg=~s|http:/[^/]*//home/httpd/html|; + $bgimg=~s|http:/[^/]*|/home/httpd/html|; $bgimg=~s|/$||; #if no eps file try to replicate it if (not-e $bgimg) {