Index: openacs-4/packages/notifications/tcl/notification-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.tcl,v
diff -u -r1.23 -r1.23.2.1
--- openacs-4/packages/notifications/tcl/notification-procs.tcl	17 Aug 2018 13:02:43 -0000	1.23
+++ openacs-4/packages/notifications/tcl/notification-procs.tcl	16 Dec 2019 17:55:12 -0000	1.23.2.1
@@ -310,7 +310,7 @@
                 }
 
                 # Truncate notif_subject to the max len of 100
-                set notif_subject [string_truncate -len 100 -- $notif_subject]
+                set notif_subject [ad_string_truncate -len 100 -- $notif_subject]
 
                 # Set up the vars
                 set extra_vars [ns_set create]