Index: openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl	13 May 2002 06:00:06 -0000	1.8
+++ openacs-4/packages/bboard-portlet/tcl/bboard-admin-portlet-procs.tcl	29 May 2002 23:00:26 -0000	1.9
@@ -53,16 +53,13 @@
 
         @return new element_id
     } {
-        # we use "portal::add_element" here since there is no
-        # configuration necessary for this portlet (no params)
-        set element_id [portal::add_element \
+        return [portal::add_element_parameters \
             -pretty_name [get_pretty_name] \
             -portal_id $portal_id \
             -portlet_name [get_my_name] \
+            -key package_id \
+            -value $package_id
         ]
-
-        portal::set_element_param $element_id package_id $package_id
-        return $element_id
     }
 
     ad_proc -public remove_self_from_page {