Index: openacs-4/packages/ams/www/list-code.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/www/list-code.adp,v diff -u -r1.8 -r1.9 --- openacs-4/packages/ams/www/list-code.adp 14 Feb 2006 21:49:29 -0000 1.8 +++ openacs-4/packages/ams/www/list-code.adp 16 Feb 2006 13:57:15 -0000 1.9 @@ -4,15 +4,6 @@

#ams.lt_Here_is_the_code_nece#

-set list_id [ams::list::new \
-                -package_key "@list_info.package_key@" \
-                -object_type "@list_info.object_type@" \
-                -list_name "@list_info.list_name@" \
-                -pretty_name "@list_info.pretty_name@" \
-                -description "@list_info.description@" \
-                -description_mime_type "@list_info.description_mime_type@"]
-
-
 
 
 
@@ -54,13 +45,23 @@
 ###
 #################################
 
+set list_id [ams::list::new \
+                -package_key "@list_info.package_key@" \
+                -object_type "@list_info.object_type@" \
+                -list_name "@list_info.list_name@" \
+                -pretty_name "@list_info.pretty_name@" \
+                -description "@list_info.description@" \
+                -description_mime_type "@list_info.description_mime_type@"]
+
+
+
 
 
 set attribute_id [attribute::id -object_type "@attributes2.object_type@" -attribute_name "@attributes2.attribute_name@"]
 ams::list::attribute::map \
               -list_id $list_id \
               -attribute_id $attribute_id \
-              -sort_order "@attributes2.list_sort_order@" \
+              -sort_order "@attributes2.list_sort_order@0" \
               -required_p "@attributes2.required_p@" \
               -section_heading "@attributes2.section_heading@"