Index: openacs-4/packages/acs-tcl/tcl/exception-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/exception-procs.tcl,v
diff -u -r1.11.2.4 -r1.11.2.5
--- openacs-4/packages/acs-tcl/tcl/exception-procs.tcl	12 Sep 2022 14:52:02 -0000	1.11.2.4
+++ openacs-4/packages/acs-tcl/tcl/exception-procs.tcl	28 Dec 2022 09:25:22 -0000	1.11.2.5
@@ -80,8 +80,8 @@
         set extraTraps {}
         if {$auto_abort_p} {
             #
-            # The "subst" below is just used for resolving $body in
-            # the debug message.
+            # Add silent handling of "ad_script_abort" to
+            # the traps.
             #
             lappend extraTraps \
                 trap {AD EXCEPTION ad_script_abort} {result} {
@@ -129,8 +129,8 @@
         set extraTraps {}
         if {$auto_abort_p} {
             #
-            # The "subst" below is just used for resolving $body in
-            # the debug message.
+            # Add silent handling of "ad_script_abort" to
+            # the traps.
             #
             lappend extraTraps \
                 trap {AD EXCEPTION ad_script_abort} {result} {