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.8 -r1.9
--- openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql 11 Dec 2003 21:39:53 -0000 1.8
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs-oracle.xql 16 Nov 2017 13:05:50 -0000 1.9
@@ -2,31 +2,6 @@
oracle8.1.6
-
-
- update lang_messages
- set [join $set_clauses ", "]
- where locale = :locale
- and message_key = :message_key
- and package_key = :package_key
- returning message into :1
-
-
-
-
-
- insert into lang_messages ([join $col_clauses ", "])
- values ([join $val_clauses ", "])
- returning message into :1
-
-
-
-
-
- sysdate
-
-
-
empty_clob()
@@ -43,10 +18,4 @@
-
-
- sync_time = sysdate
-
-
-
Index: openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql 11 Dec 2003 21:39:53 -0000 1.9
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs-postgresql.xql 16 Nov 2017 13:05:50 -0000 1.10
@@ -2,29 +2,6 @@
postgresql7.2
-
-
- update lang_messages
- set [join $set_clauses ", "]
- where locale = :locale
- and message_key = :message_key
- and package_key = :package_key
-
-
-
-
-
- insert into lang_messages ([join $col_clauses ", "])
- values ([join $val_clauses ", "])
-
-
-
-
-
- current_timestamp
-
-
-
:message
@@ -40,10 +17,4 @@
-
-
- sync_time = current_timestamp
-
-
-
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.55 -r1.56
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl 7 Aug 2017 23:47:56 -0000 1.55
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl 16 Nov 2017 13:05:50 -0000 1.56
@@ -231,7 +231,7 @@
# Trying to avoid hitting Oracle bug#2011927
if { [string trim $message] eq "" } {
- db_dml lang_message_null_update {}
+ db_dml lang_message_update {}
} else {
set cols(message) [db_map message]
db_dml lang_message_update {} -clobs [list $message]
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.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 @@
-
+
+ insert into lang_messages ([join $col_clauses ", "])
+ values ([join $val_clauses ", "])
+
+
+
+
+
update lang_messages
set [join $set_clauses ", "]
where locale = :locale
@@ -29,6 +36,18 @@
+
+
+ current_timestamp
+
+
+
+
+
+ sync_time = current_timestamp
+
+
+
insert into lang_messages ([join $col_clauses ", "])