Index: openacs-4/packages/acs-admin/www/auth/batch-job.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/auth/batch-job.tcl,v
diff -u -r1.17.2.1 -r1.17.2.2
--- openacs-4/packages/acs-admin/www/auth/batch-job.tcl	12 Mar 2019 17:30:52 -0000	1.17.2.1
+++ openacs-4/packages/acs-admin/www/auth/batch-job.tcl	16 Dec 2019 17:55:12 -0000	1.17.2.2
@@ -165,7 +165,7 @@
     } else {
         set short_message ""
     }
-    set short_message [string_truncate -len 75 -- $short_message]
+    set short_message [ad_string_truncate -len 75 -- $short_message]
 
     if { $user_exists_p && $user_id ne ""  } {
         set user_url [acs_community_member_admin_url -user_id $user_id]