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.19 -r1.68.2.20
--- openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	31 Jan 2022 16:33:58 -0000	1.68.2.19
+++ openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl	1 Feb 2022 13:17:36 -0000	1.68.2.20
@@ -254,13 +254,8 @@
                 $old_message_array(conflict_p) \
                 $old_message_array(upgrade_status)
 
-            # Trying to avoid hitting Oracle bug#2011927
-            if { [string trim $message] eq "" } {
-                db_dml lang_message_update {}
-            } else {
-                set cols(message) [db_map message]
-                db_dml lang_message_update {} -clobs [list $message]
-            }
+            set cols(message) [db_map message]
+            db_dml lang_message_update {} -clobs [list $message]
         }
     } else {
         # Insert new message
@@ -282,12 +277,7 @@
             lappend val_clauses $cols($col)
         }
 
-        # avoiding bug#2011927 from Oracle.
-        if { [string trim $message] eq "" } {
-            db_dml lang_message_insert_null_msg {}
-        } else {
-            db_dml lang_message_insert {} -clobs [list $message]
-        }
+        db_dml lang_message_insert {} -clobs [list $message]
     }
 
     # Update the message catalog cache
@@ -1096,11 +1086,7 @@
     @author Simon Carstensen
     @creation-date 2003-08-12
 } {
-    if { [string trim $description] eq "" } {
-        db_dml update_description_insert_null {}
-    } else {
-        db_dml update_description {} -clobs [list $description]
-    }
+    db_dml update_description {} -clobs [list $description]
 }
 
 # Local variables: