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.40 -r1.41
--- openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	29 May 2002 23:00:26 -0000	1.40
+++ openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	31 May 2002 13:28:23 -0000	1.41
@@ -67,11 +67,10 @@
             set extra_params [list]
         }
 
-        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] 
+        # that allows for dotlrn-fs to be cleaned up
+        # however, we do need the rest of theextra_params
+        lappend extra_params [list package_id $package_id]
 
         return [portal::add_element_parameters \
             -portal_id $portal_id \
@@ -81,7 +80,8 @@
             -force_region $force_region \
             -param_action $param_action \
             -value $folder_id \
-            -key folder_id
+            -key folder_id \
+            -extra_params [eval concat $extra_params] 
         ]
     }