Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v
diff -u -N -r1.109.2.13 -r1.109.2.14
--- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	26 Dec 2019 14:44:08 -0000	1.109.2.13
+++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl	14 Jan 2020 10:38:03 -0000	1.109.2.14
@@ -2447,7 +2447,7 @@
 #
 #####
 
-ad_proc -deprecated ad_string_truncate args {
+ad_proc -deprecated string_truncate args {
     Truncates a string to len characters adding the string provided in
     the ellipsis parameter if the string was truncated.
 
@@ -2532,7 +2532,7 @@
     return $string
 }
 
-ad_proc -deprecated ad_string_truncate_middle args {
+ad_proc -deprecated string_truncate_middle args {
     Cut middle part of a string in case it is too long
 
     DEPRECATED: does not comply with OpenACS naming convention