Index: openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql	18 Aug 2003 08:10:21 -0000	1.6
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql	22 Sep 2003 11:49:01 -0000	1.7
@@ -16,8 +16,8 @@
 
   <fullquery name="lang::message::register.lang_message_insert">      
     <querytext>
-      insert into lang_messages (package_key, message_key, locale, message, upgrade_status) 
-      values (:package_key, :message_key, :locale, empty_clob(), :message_upgrade_status) 
+      insert into lang_messages (package_key, message_key, locale, message, upgrade_status, creation_user) 
+      values (:package_key, :message_key, :locale, empty_clob(), :message_upgrade_status, :creation_user) 
       returning message into :1
     </querytext>
   </fullquery>