Index: openacs.org-dev/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl	9 Jul 2002 17:34:56 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-bootstrap-installer/db-init-checks-postgresql.tcl	8 Oct 2002 15:46:41 -0000	1.1.1.2
@@ -45,6 +45,12 @@
         set my_error_p 1
     }
 
+
+    ## 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"]]} {
+	catch { ns_db dml $db "drop function __test__();" }
+    }
+
     if { [catch { ns_db dml $db "create function __test__() returns integer as 'begin end;' language 'plpgsql'" } errmsg] } {
         append my_errors "<li>PL/pgSQL has not been created in your database.  Execute the following command while logged in as a PostgreSQL \"superuser\": <blockquote><pre>createlang plpgsql your_database_name</pre></blockquote>\n"  
         set my_error_p 1