Index: openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl,v
diff -u -r1.55 -r1.56
--- openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	7 Apr 2018 19:48:03 -0000	1.55
+++ openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	9 Apr 2018 20:11:54 -0000	1.56
@@ -1038,7 +1038,7 @@
                         set message_count($action) [expr {$message_count($action) + $loop_message_count($action)}]
                     }
                 }
-                set message_count(errors) [concat $message_count(errors) $loop_message_count(errors)]
+                lappend message_count(errors) {*}$loop_message_count(errors)
             }
         }
     }