--- loncom/homework/inputtags.pm	2010/12/19 02:58:16	1.274
+++ loncom/homework/inputtags.pm	2010/12/19 21:12:20	1.275
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.274 2010/12/19 02:58:16 raeburn Exp $
+# $Id: inputtags.pm,v 1.275 2010/12/19 21:12:20 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1279,6 +1279,9 @@ sub setgradedata {
         ($Apache::lonhomework::type eq 'randomizetry')) {
         $Apache::lonhomework::results{"resource.$id.type"} = $Apache::lonhomework::type;
     }
+    if ($Apache::lonhomework::type eq 'randomizetry') {
+        $Apache::lonhomework::results{"resource.$id.rndseed"} = $env{'form.'.$id.'.rndseed'};
+    }
 }
 
 sub find_which_previous {