Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 3 Dec 2001 20:45:03 -0000 1.13 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 10 Dec 2001 19:31:49 -0000 1.14 @@ -157,6 +157,12 @@ # Make file storage available at community-user page level fs_portlet::add_self_to_page $portal_id $package_id $folder_id + + # Now for the user workspace + set workspace_portal_id [dotlrn::get_workspace_portal_id $user_id] + + # Add the portlet here + fs_portlet::add_self_to_page $workspace_portal_id $package_id $folder_id } ad_proc -public remove_user {