Index: openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl 10 May 2002 06:35:15 -0000 1.3 +++ openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl 13 May 2002 06:00:06 -0000 1.4 @@ -74,20 +74,21 @@ } { set pt_id [dotlrn_community::get_portal_template_id $community_id] + syllabus_portlet::add_self_to_page $pt_id $community_id + if {[dotlrn_community::dummy_comm_p -community_id $community_id]} { - syllabus_portlet::add_self_to_page $pt_id $community_id return } - syllabus_portlet::add_self_to_page $pt_id $community_id - dotlrn_syllabus_admin::add_applet_to_community $community_id } ad_proc -public remove_applet_from_community { community_id } { } { + dotlrn_syllabus_admin::remove_applet_to_community $community_id + syllabus_portlet::remove_self_from_page $pt_id $community_id } ad_proc -public add_user {