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 -N -r1.9 -r1.10
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	7 Aug 2017 23:47:56 -0000	1.9
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	16 Nov 2017 13:05:50 -0000	1.10
@@ -19,8 +19,15 @@
     </querytext>
   </fullquery>
 
-  <fullquery name="lang::message::register.lang_message_null_update">
+  <fullquery name="lang::message::register.lang_message_insert">      
     <querytext>
+      insert into lang_messages ([join $col_clauses ", "]) 
+      values ([join $val_clauses ", "])
+    </querytext>
+  </fullquery>
+  
+  <fullquery name="lang::message::register.lang_message_update">
+    <querytext>
       update lang_messages 
       set    [join $set_clauses ", "]
       where  locale = :locale 
@@ -29,6 +36,18 @@
     </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>
+  
   <fullquery name="lang::message::register.lang_message_insert_null_msg">
     <querytext>
       insert into lang_messages ([join $col_clauses ", "])