Index: openacs-4/packages/xotcl-core/tcl/cluster-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cluster-procs.tcl,v
diff -u -N -r1.13.2.2 -r1.13.2.3
--- openacs-4/packages/xotcl-core/tcl/cluster-procs.tcl	3 Oct 2021 17:38:49 -0000	1.13.2.2
+++ openacs-4/packages/xotcl-core/tcl/cluster-procs.tcl	4 Oct 2021 08:31:48 -0000	1.13.2.3
@@ -18,7 +18,7 @@
   ad_proc -deprecated cache_flush_all {cache pattern} {
     Provide means to perform a wildcard-based cache flushing on
     (cluster) machines.
-  }
+  } {
     ::acs::cache_flush_all $cache $pattern
   }