--- rat/lonratparms.pm	2002/05/29 18:52:57	1.10
+++ rat/lonratparms.pm	2003/02/25 15:58:51	1.13
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Set parameters inside of the RAT
 #
-# $Id: lonratparms.pm,v 1.10 2002/05/29 18:52:57 stredwic Exp $
+# $Id: lonratparms.pm,v 1.13 2003/02/25 15:58:51 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -54,7 +54,7 @@ sub handler {
 # Get query string for limited number of parameters
 
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
-                                            ['url','params','resid']);
+                                            ['url','parms','resid']);
 
 # ------------------------------------------------------------------- Read file
 
@@ -73,6 +73,22 @@ sub handler {
       }
   }
 
+# -------------------------------------- Additional parms for certain resources
+
+    if ($uri=~/\.(sequence|page)\.meta$/) {
+        $content{'parameter_randompick'}='';
+        $type{'parameter_randompick'}='int_pos';
+	$display{'parameter_randompick'}='Randomly pick number of resources';
+        
+        $content{'parameter_randompickseed'}='';
+        $type{'parameter_randompickseed'}='int_pos';
+	$display{'parameter_randompickseed'}=
+ 'Random seed for randomly picking number of resources (optional, only set if you know what you are doing)';
+    } else {
+        $content{'parameter_mapalias'}='';
+        $type{'parameter_mapalias'}='string';
+	$display{'parameter_mapalias'}='Resource alias name for conditions';
+    }
 # ---------------------------------------------------------- Current Parameters
 
   foreach (split(/\:/,$ENV{'form.parms'})) {