Index: openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl,v
diff -u -N -r1.68.2.13 -r1.68.2.14
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	16 Dec 2020 14:41:50 -0000	1.68.2.13
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	18 Feb 2021 12:45:13 -0000	1.68.2.14
@@ -1007,20 +1007,19 @@
 #
 #####
 
-ad_proc -public _mr { locale key message } {
+ad_proc -private -deprecated _mr { locale key message } {
 
     Registers a message in a given locale or language.
     Inserts the message into the table lang_messages
     if it does not exist and updates if it does.
 
-    For backward compatibility - it assumes that the key
-    is the concatenation of message and package key
-    like this:
+    It assumes that the key is the concatenation of message and
+    package key like this:  package_key.message_key
 
-    package_key.message_key
-
-    @author Jeff Davis (davis@xarg.net)
-
+    Actually, there is very little need for this proc (which is not
+    used in the 300+ packages in the repository), therefore, it is
+    marked as deprecated. Use lang::message::register instead.
+    
     @param locale  Abbreviation for language of the message or the locale.
     @param key     Unique identifier for this message. Will be the same identifier
                    for each language