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.14 -r1.15 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 10 Dec 2001 19:31:49 -0000 1.14 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 10 Dec 2001 19:33:04 -0000 1.15 @@ -185,6 +185,12 @@ # remove user permissions to see fs folders # nothing to do here + + # Remove from the main workspace + set workspace_portal_id [dotlrn::get_workspace_portal_id $user_id] + + # Add the portlet here + fs_portlet::remove_self_from_page $workspace_portal_id $package_id } }