Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v
diff -u -N -r1.108.2.18 -r1.108.2.19
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	22 Feb 2021 16:32:41 -0000	1.108.2.18
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	23 Feb 2021 16:09:36 -0000	1.108.2.19
@@ -909,13 +909,17 @@
     }
 
     #---------------------------------------
-    ad_proc -private message_interpolate {
+    ad_proc -deprecated -private message_interpolate {
         {-values:required}
         {-text:required}
     } {
         Interpolates a set of values into a string. This is directly
         copied from the bulk mail package.
 
+        DEPRECATED: duplicated code from bulk-mail that could be replaced by
+                    "string map"
+        @see "string map"
+
         @param values a list of key, value pairs, each one consisting of a
         target string and the value it is to be replaced with.
         @param text the string that is to be interpolated