Index: openacs-4/packages/acs-subsite/www/admin/attributes/enum-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/attributes/enum-add-2.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/admin/attributes/enum-add-2.tcl	10 Jan 2007 21:22:06 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/admin/attributes/enum-add-2.tcl	27 Oct 2014 16:39:48 -0000	1.3
@@ -9,7 +9,7 @@
     @cvs-id $Id$
 
 } {
-    attribute_id:integer,notnull
+    attribute_id:naturalnum,notnull
     attribute_enum_values:array,trim,optional
     { operation:trim "Finish adding values" }
     { return_url "" }
@@ -61,9 +61,9 @@
 
 if {$operation eq "Add more values"} {
     # redirect to add more values
-    set return_url enum-add?[ad_export_vars {attribute_id return_url}]
+    set return_url enum-add?[export_vars {attribute_id return_url}]
 } elseif { $return_url eq "" } {
-    set return_url one?[ad_export_vars attribute_id]
+    set return_url one?[export_vars attribute_id]
 }
 
 ad_returnredirect $return_url