Index: openacs-4/packages/dotlrn-dotlrn/sql/postgresql/dotlrn-members-staff-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/postgresql/dotlrn-members-staff-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-dotlrn/sql/postgresql/dotlrn-members-staff-create.sql 29 Mar 2002 16:59:13 -0000 1.1 +++ openacs-4/packages/dotlrn-dotlrn/sql/postgresql/dotlrn-members-staff-create.sql 10 May 2002 06:35:14 -0000 1.2 @@ -96,9 +96,37 @@ 'TCL' ); + + -- AddUserToCommunity + select acs_sc_impl_alias__new ( + 'dotlrn_applet', + 'dotlrn_members_staff', + 'AddUserToCommunity', + 'dotlrn_members_staff::add_user_to_community', + 'TCL' + ); + + -- RemoveUser + select acs_sc_impl_alias__new ( + 'dotlrn_applet', + 'dotlrn_members_staff', + 'RemoveUser', + 'dotlrn_members_staff::remove_user', + 'TCL' + ); + + -- RemoveUserFromCommunity + select acs_sc_impl_alias__new ( + 'dotlrn_applet', + 'dotlrn_members_staff', + 'RemoveUserFromCommunity', + 'dotlrn_members_staff::remove_user_from_community', + 'TCL' + ); + -- Add the binding select acs_sc_binding__new ( contract_name => 'dotlrn_applet', - impl_name => 'dotlrn_members_staff' + impl_name => 'dotlrn_members_staff_staff' ); end;