--- loncom/homework/randomlabel.pm	2003/11/11 00:25:24	1.53
+++ loncom/homework/randomlabel.pm	2004/01/08 20:05:13	1.54
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # random labelling tool
 #
-# $Id: randomlabel.pm,v 1.53 2003/11/11 00:25:24 albertel Exp $
+# $Id: randomlabel.pm,v 1.54 2004/01/08 20:05:13 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -124,7 +124,9 @@ sub start_randomlabel {
 		    $temp_file = Apache::File->new('>>'.$filename);
 		    $newbgimg =~ s/(.*)\/res\//\/home\/httpd\/html\/res\//;
 		    print $temp_file "$newbgimg\n";
-		    $bgimg=~s/\/home\/httpd\/html\/res/\/home\/httpd\/prtspool/;		}
+		    $bgimg=~s/\/home\/httpd\/html\/res/\/home\/httpd\/prtspool/;
+		    $bgimg=~s|\/home\/([^\/]*)\/public_html\/|\/home\/httpd\/prtspool\/$1\/|;
+		}
 	    }
 	}
 	$bgimg=~s/\/$//;