--- rat/lonuserstate.pm	2002/06/27 13:21:04	1.31
+++ rat/lonuserstate.pm	2002/06/27 14:08:26	1.32
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construct and maintain state and binary representation of course for user
 #
-# $Id: lonuserstate.pm,v 1.31 2002/06/27 13:21:04 www Exp $
+# $Id: lonuserstate.pm,v 1.32 2002/06/27 14:08:26 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -436,7 +436,13 @@ sub pickrandom {
         for (my $k=0; $k<=$#currentrids; $k++) {
             if ($currentrids[$k]) {
 		$hash{'randomout_'.$currentrids[$k]}=1;
-                $randomoutentry.='&'.$currentrids[$k].'&';
+                my ($mapid,$resid)=split(/\./,$currentrids[$k]);
+                $randomoutentry.='&'.
+                 &Apache::lonnet::symbclean(
+		    &Apache::lonnet::declutter($hash{'map_id_'.$mapid}).
+                    '___'.$resid.'___'.
+		    &Apache::lonnet::declutter($hash{'src_'.$currentrids[$k]})
+                 ).'&';
             }
         }
     }