Index: openacs-4/packages/acs-tcl/tcl/json-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/json-procs.tcl,v
diff -u -N -r1.5 -r1.5.2.1
--- openacs-4/packages/acs-tcl/tcl/json-procs.tcl	22 Aug 2011 23:46:39 -0000	1.5
+++ openacs-4/packages/acs-tcl/tcl/json-procs.tcl	29 Sep 2013 14:55:32 -0000	1.5.2.1
@@ -464,7 +464,7 @@
 } {
     set new_row {}
     foreach value $row {
-        if { $value == "" } {
+        if { $value eq "" } {
             lappend new_row null
         } else {
             lappend new_row $value