Index: openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl,v
diff -u -N -r1.10.2.22 -r1.10.2.23
--- openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl	5 Dec 2021 15:42:02 -0000	1.10.2.22
+++ openacs-4/packages/acs-tcl/tcl/acs-cache-procs.tcl	5 Jan 2022 13:09:37 -0000	1.10.2.23
@@ -374,7 +374,7 @@
 
         :public method flush_pattern {{-partition_key:required} pattern} {
             #
-            # flush just in the determined partition
+            # flush just in all partitions
             #
             :flush_pattern_in_all_partitions $pattern
         }
@@ -466,9 +466,9 @@
                     return ""
                 }
                 dict set ${:prefix} $key $value
-                #ns_log notice "### [list  dict set ${:prefix} $key $value]"
+                #ns_log notice "### [list dict set ${:prefix} $key $value]"
             }
-            #ns_log notice "### will return [list  dict get ${:prefix} $key]"
+            #ns_log notice "### will return [list dict get ${:prefix} $key]"
             return [dict get [set ${:prefix}] $key]
         }