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.3 -r1.4
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	3 Dec 2002 17:26:54 -0000	1.3
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.xql	19 Dec 2002 16:00:53 -0000	1.4
@@ -22,29 +22,23 @@
   <fullquery name="lang::message::register.insert_message_key">
     <querytext> 
         insert into lang_message_keys
-            (message_key, package_key)
+            (message_key, package_key, upgrade_status)
           values
-            (:message_key, :package_key)
+            (:message_key, :package_key, :key_upgrade_status)
     </querytext>
   </fullquery>
 
   <fullquery name="lang::message::register.lang_message_null_update">
     <querytext>
       update lang_messages 
-      set    message = null
+      set    message = null,
+             upgrade_status = :message_upgrade_status
       where  locale = :locale 
       and    package_key = :package_key
       and    message_key = :message_key
     </querytext>
   </fullquery>
 
-  <fullquery name="lang::message::register.lang_message_insert">      
-    <querytext>
-      insert into lang_messages (package_key, message_key, locale, message)
-      values (:package_key, :message_key, :locale, null)
-    </querytext>
-  </fullquery>
-
   <fullquery name="lang::message::cache.select_locale_keys">
     <querytext>
       select locale, package_key, message_key, message