Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v
diff -u -r1.139 -r1.140
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	12 May 2002 18:15:03 -0000	1.139
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	13 May 2002 06:00:07 -0000	1.140
@@ -1042,7 +1042,7 @@
         that datasource on the portal. An element_id overrides all other params
     } {
         if {![empty_string_p $element_id]} {
-            db_dml delete {}
+           db_dml delete {}
         } else {
             if {[empty_string_p $portal_id] && [empty_string_p $portlet_name]} {
                 ad_return_complaint 1 "portal::remove_element error bad params! \n
@@ -1810,7 +1810,7 @@
                 if {[llength [get_element_param_list \
                         -element_id $element_id \
                         -key $key]] == 0} {
-                    remove_element $element_id
+                    remove_element -element_id $element_id
                 }
             }
         }