--- loncom/homework/structuretags.pm	2005/10/17 16:06:32	1.305
+++ loncom/homework/structuretags.pm	2005/11/01 21:52:47	1.307
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.305 2005/10/17 16:06:32 albertel Exp $
+# $Id: structuretags.pm,v 1.307 2005/11/01 21:52:47 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -74,8 +74,7 @@ sub body_tag_start {
 	'onunload="'.&Apache::lonmenu::unloadevents().'" ';
     if ($env{'browser.imagesuppress'} eq 'on') { $background=''; }
     if ($background) {
-	$Apache::lonxml::extlinks[$#Apache::lonxml::extlinks+1]=
-	    $background;
+	&Apache::lonxml::extlink($background);
 	$body_tag_start.='background="'.$background.'" ';
     } else {
 	if (($bgcolor) && ($env{'browser.blackwhite'} ne 'on')) {
@@ -193,7 +192,7 @@ sub setup_rndseed {
 	    delete($env{'form.newrandomization'});
 	}
 	if (defined($rndseed) && $rndseed ne int($rndseed)) {
-	   $rndseed=join(',',&Math::Random::random_seed_from_phrase($rndseed));
+	    $rndseed=join(':',&Apache::lonnet::digest($rndseed));
         }
         if ($Apache::lonhomework::history{'resource.CODE'}) {
 	   $rndseed=&Apache::lonnet::rndseed();