Index: openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl,v
diff -u -r1.68.2.20 -r1.68.2.21
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	1 Feb 2022 13:17:36 -0000	1.68.2.20
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	1 Feb 2022 13:23:08 -0000	1.68.2.21
@@ -197,7 +197,7 @@
     # Build up an array of columns to set
     array set cols [list]
     if { $update_sync_p } {
-        set cols(sync_time) [db_map sync_time]
+        set cols(sync_time) current_timestamp
     } else {
         set cols(sync_time) "null"
     }
@@ -554,10 +554,8 @@
         lappend set_clauses "$name = :$name"
         set $name $edit_array($name)
     }
-    if { $update_sync_p } {
-        if { ![info exists edit_array(sync_time)] } {
-            lappend set_clauses [db_map set_sync_time_now]
-        }
+    if { $update_sync_p && ![info exists edit_array(sync_time)] } {
+        lappend set_clauses {sync_time = current_timestamp}
     }
 
     if { [llength $set_clauses] > 0 } {
Index: openacs-4/packages/acs-lang/tcl/lang-message-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs.xql,v
diff -u -r1.11.2.2 -r1.11.2.3
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	1 Feb 2022 13:17:36 -0000	1.11.2.2
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	1 Feb 2022 13:23:08 -0000	1.11.2.3
@@ -27,16 +27,4 @@
     </querytext>
   </fullquery>
 
-  <partialquery name="lang::message::register.sync_time">
-    <querytext>
-        current_timestamp
-    </querytext>
-  </partialquery>
-
-  <partialquery name="lang::message::edit.set_sync_time_now">
-      <querytext>
-        sync_time = current_timestamp
-      </querytext>
-  </partialquery>
-
 </queryset>