Index: openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl 10 Nov 2001 18:45:38 -0000 1.5 +++ openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl 13 Nov 2001 16:20:51 -0000 1.6 @@ -90,6 +90,12 @@ # Call the portal element to be added correctly bboard_portlet::add_self_to_page $page_id $package_id + + # Now for the user workspace + set workspace_page_id [dotlrn_community::get_workspace_page_id $user_id] + + # Add the portlet here + bboard_portlet::add_self_to_page $workspace_page_id $package_id } ad_proc -public remove_user { @@ -112,6 +118,12 @@ # remove user permissions to see bboards # nothing to do here + + # Remove from the main workspace + set workspace_page_id [dotlrn_community::get_workspace_page_id $user_id] + + # Add the portlet here + bboard_portlet::remove_self_from_page $workspace_page_id $package_id } }