Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl,v diff -u -N -r1.127 -r1.128 --- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 12 Feb 2019 16:29:19 -0000 1.127 +++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 12 Feb 2019 16:34:22 -0000 1.128 @@ -356,14 +356,14 @@ return $result } -ad_proc -public db_nullify_empty_string { string } { +ad_proc -public -deprecated db_nullify_empty_string { string } { A convenience function that returns [db_null] if $string is the empty string. + + Deprecated: essentially just returns the passed string. + + @see: db_null } { - if { $string eq "" } { - return [db_null] - } else { - return $string - } + return $string } ad_proc -public db_boolean { bool } {