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.8 -r1.9 --- openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl 29 Nov 2001 07:00:19 -0000 1.8 +++ openacs-4/packages/dotlrn-bboard/tcl/dotlrn-bboard-procs.tcl 29 Nov 2001 22:49:19 -0000 1.9 @@ -49,8 +49,16 @@ ad_proc -public add_applet { community_id } { - Add the bboard applet + Add the bboard applet to dotlrn - for one-time init } { + + } + + ad_proc -public add_applet_to_community { + community_id + } { + Add the bboard applet to a dotlrn community + } { # Create and Mount set package_key [package_key] set package_id [dotlrn::instantiate_and_mount $community_id $package_key] @@ -87,8 +95,20 @@ community_id user_id } { - Add a user to a community + Called when the user is initially added as a dotlrn user. + For one-time init stuff + } { + + } + + + ad_proc -public add_user_to_community { + community_id + user_id + } { + Add a user to a specific dotlrn community + } { # Get the page_id by callback set page_id [dotlrn_community::get_page_id $community_id $user_id]