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 -N -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: