Index: openacs-4/packages/content-includelet/tcl/content-includelet-utility-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/content-includelet/tcl/content-includelet-utility-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/content-includelet/tcl/content-includelet-utility-procs.tcl	11 Jul 2008 16:38:55 -0000	1.1
+++ openacs-4/packages/content-includelet/tcl/content-includelet-utility-procs.tcl	30 Jul 2008 11:49:37 -0000	1.2
@@ -21,9 +21,9 @@
 } {
     # Create the content item and stuff its id into the includelet.
 
-    set package_id [lindex [layout::element::parameter::get \
-                               -element_id $element_id \
-                               -key package_id] 0] 
+    set package_id [layout::element::get_column_value \
+                       -element_id $element_id \
+                       -column package_id]
  
     set content_id [content::item::new \
                        -name "Content For $package_id's $parameter" \
@@ -32,7 +32,7 @@
                        -content_type content_includelet_revision \
                        -storage_type text]
 
-    layout::element::parameter::new \
+    layout::element::parameter::add_values \
         -element_id $element_id \
         -parameters [list $parameter $content_id]
 }