Index: openacs-4/packages/dotlrn-research/tcl/research-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-research/tcl/Attic/research-portlet-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/dotlrn-research/tcl/research-portlet-procs.tcl	15 May 2002 19:30:42 -0000	1.5
+++ openacs-4/packages/dotlrn-research/tcl/research-portlet-procs.tcl	24 May 2002 01:58:46 -0000	1.6
@@ -50,26 +50,22 @@
 
     ad_proc -public add_self_to_page {
 	{-portal_id:required}
-        {-page_name ""}
-	{-package_id:required}
         {-party_id:required}
     } {
         Adds a research portlet element to the specified page.
 
         @param page_name The page to add self to
 	@param portal_id The portal to add self to
-        @param package_id XXX DO NOT KNOW WHAT THIS IS
         @param party_id The party for which to display research papers
 
 	@return element_id The new element's id
     } {
-        return [portal::add_element_or_append_id \
+        return [portal::add_element_parameters \
             -portal_id $portal_id \
-            -page_name $page_name \
             -portlet_name [get_my_name] \
             -pretty_name [get_pretty_name] \
             -key "party_id" \
-            -value_id $party_id
+            -value $party_id
         ]
     }
 
@@ -84,11 +80,11 @@
         @param package_id XXX DO NOT KNOW WHAT THIS IS
         @param party_id The party for which to display research papers
     } {
-        portal::remove_element_or_remove_id \
+        portal::remove_element_parameters \
             -portal_id $portal_id \
             -portlet_name [get_my_name] \
             -key "party_id" \
-            -value_id $party_id
+            -value $party_id
     }
 
     ad_proc -public make_self_available {