Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.189.2.151 -r1.189.2.152
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	11 Oct 2022 09:04:57 -0000	1.189.2.151
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	11 Oct 2022 09:12:50 -0000	1.189.2.152
@@ -1770,7 +1770,7 @@
         }
         dict incr messages $message
     }
-    ad_set_client_property "acs-kernel" "general_messages" $messages
+    ad_set_client_property -persistent f "acs-kernel" "general_messages" $messages
 }
 
 ad_proc -public util_get_user_messages {
@@ -1797,7 +1797,7 @@
         set keep_p 1
     }
     if { !$keep_p && $messages ne "" } {
-        ad_set_client_property "acs-kernel" "general_messages" {}
+        ad_set_client_property -persistent f "acs-kernel" "general_messages" {}
     }
     template::multirow create $multirow message
     foreach {message count} $messages {