Index: openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl,v
diff -u -N -r1.39 -r1.39.2.1
--- openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl	30 Jun 2018 22:13:39 -0000	1.39
+++ openacs-4/packages/dotlrn-static/tcl/dotlrn-static-procs.tcl	24 Aug 2020 15:15:03 -0000	1.39.2.1
@@ -152,22 +152,22 @@
         ad_return_complaint 1 "[applet_key] remove_applet not implemented!"
     }
 
-    ad_proc -public add_user {
+    ad_proc -private add_user {
         community_id
     } {
         Called when the user is initially added as a dotlrn user.
     } {
         # 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
     } {
@@ -176,7 +176,7 @@
         # noop
     }
 
-    ad_proc -public remove_user_from_community {
+    ad_proc -private remove_user_from_community {
         community_id
         user_id
     } {
@@ -274,7 +274,7 @@
             -package_id $new_community_id
     }
 
-    ad_proc -public change_event_handler {
+    ad_proc -private change_event_handler {
         community_id
         event
         old_value