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.33 -r1.34
--- openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	25 Apr 2002 21:20:40 -0000	1.33
+++ openacs-4/packages/fs-portlet/tcl/fs-portlet-procs.tcl	27 Apr 2002 21:50:41 -0000	1.34
@@ -56,6 +56,7 @@
     ad_proc -public add_self_to_page {
         {-page_id ""}
         {-extra_params ""}
+        {-force_region ""}
         portal_id
         instance_id
         folder_id
@@ -82,6 +83,7 @@
             -page_id $page_id \
             -pretty_name [get_pretty_name] \
             -portlet_name [my_name] \
+	    -force_region $force_region \
             -value_id $folder_id \
             -key folder_id \
             -extra_params [eval concat $extra_params]