Index: openacs-4/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl,v
diff -u -r1.13 -r1.13.10.1
--- openacs-4/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl	10 Jan 2007 21:22:02 -0000	1.13
+++ openacs-4/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl	27 Aug 2013 11:01:47 -0000	1.13.10.1
@@ -47,7 +47,7 @@
 
 
     ## Make sure the __test__() function is dropped if it exists
-    if {![empty_string_p [ns_db 0or1row $db "select proname from pg_proc where proname = '__test__' and pronargs = 0"]]} {
+    if {[ns_db 0or1row $db "select proname from pg_proc where proname = '__test__' and pronargs = 0"] ne ""} {
 	catch { ns_db dml $db "drop function __test__();" }
     }