Index: openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl,v
diff -u -r1.39 -r1.40
--- openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	24 May 2002 01:58:44 -0000	1.39
+++ openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	29 May 2002 23:00:26 -0000	1.40
@@ -68,6 +68,10 @@
         }
 
         lappend extra_params [list package_id $package_id]
+        # it seems to me that package_id is not needed. 
+        # that allows for dotlrn-fs to be cleaned up - aks
+        #
+        #  -extra_params [eval concat $extra_params] 
 
         return [portal::add_element_parameters \
             -portal_id $portal_id \
@@ -77,8 +81,7 @@
             -force_region $force_region \
             -param_action $param_action \
             -value $folder_id \
-            -key folder_id \
-            -extra_params [eval concat $extra_params] 
+            -key folder_id
         ]
     }