Index: openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-dotlrn-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-dotlrn-procs.tcl,v
diff -u -r1.41.2.1 -r1.41.2.2
--- openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-dotlrn-procs.tcl	14 Feb 2019 16:15:01 -0000	1.41.2.1
+++ openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-dotlrn-procs.tcl	24 Aug 2020 14:58:42 -0000	1.41.2.2
@@ -152,7 +152,7 @@
             "[applet_key] remove_applet_from_community not implemented!"
     }
 
-    ad_proc -public add_user {
+    ad_proc -private add_user {
         user_id
     } {
         Called for one time init when this user is added to dotlrn.
@@ -162,15 +162,15 @@
         # noop
     }
 
-    ad_proc -public remove_user {
+    ad_proc -private remove_user {
         user_id
     } {
         remove a user from dotlrn
     } {
         # noop
     }
 
-    ad_proc -public add_user_to_community {
+    ad_proc -private add_user_to_community {
         community_id
         user_id
     } {
@@ -179,7 +179,7 @@
         # noop
     }
 
-    ad_proc -public remove_user_from_community {
+    ad_proc -private remove_user_from_community {
         community_id
         user_id
     } {
@@ -269,7 +269,7 @@
         return [add_applet_to_community $new_community_id]
     }
 
-    ad_proc -public change_event_handler {
+    ad_proc -private change_event_handler {
         community_id
         event
         old_value
Index: openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl,v
diff -u -r1.23 -r1.23.2.1
--- openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl	30 Jun 2018 22:13:39 -0000	1.23
+++ openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-procs.tcl	24 Aug 2020 14:58:42 -0000	1.23.2.1
@@ -96,28 +96,28 @@
         dotlrn_members::remove_portlet $portal_id ""
     }
 
-    ad_proc -public add_user {
+    ad_proc -private add_user {
         user_id
     } {
     } {
         # noop
     }
 
-    ad_proc -public remove_user {
+    ad_proc -private remove_user {
         user_id
     } {
     } {
         # noop
     }
 
-    ad_proc -public add_user_to_community {
+    ad_proc -private add_user_to_community {
         community_id
         user_id
     } {
     } {
     }
 
-    ad_proc -public remove_user_from_community {
+    ad_proc -private remove_user_from_community {
         community_id
         user_id
     } {
@@ -184,7 +184,7 @@
         return [dotlrn_members::add_applet_to_community $new_community_id]
     }
 
-    ad_proc -public change_event_handler {
+    ad_proc -private change_event_handler {
         community_id
         event
         old_value
Index: openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl,v
diff -u -r1.17 -r1.17.2.1
--- openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl	27 Mar 2018 14:22:30 -0000	1.17
+++ openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl	24 Aug 2020 14:58:42 -0000	1.17.2.1
@@ -94,30 +94,30 @@
     } {
     }
 
-    ad_proc -public add_user {
+    ad_proc -private add_user {
 	user_id
     } {
 	Called for one time init when this user is added to dotlrn
     } {
         # noop
     }
 
-    ad_proc -public remove_user {
+    ad_proc -private remove_user {
         user_id
     } {
     } {
         # noop
     }
 
-    ad_proc -public add_user_to_community {
+    ad_proc -private add_user_to_community {
 	community_id
 	user_id
     } {
 	Called when a user is added to a spceific dotlrn community
     } {
     }
 
-    ad_proc -public remove_user_from_community {
+    ad_proc -private remove_user_from_community {
 	community_id
 	user_id
     } {
@@ -158,7 +158,7 @@
         return [add_applet_to_community $new_community_id]
     }
 
-    ad_proc -public change_event_handler {
+    ad_proc -private change_event_handler {
         community_id
         event
         old_value