Index: openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl,v
diff -u -r1.2.2.1 -r1.2.2.2
--- openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl	9 Mar 2002 22:51:33 -0000	1.2.2.1
+++ openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl	13 Mar 2002 20:15:50 -0000	1.2.2.2
@@ -74,7 +74,8 @@
         set my_error_p 1
     } 
 
-    set db [ns_db gethandle]
+    set pool [lindex [nsv_get db_available_pools .] 0]
+    set db [ns_db gethandle $pool]
 
     # First we look for the overall presence of interMedia
     set sql "SELECT (SELECT COUNT(*) FROM USER_ROLE_PRIVS WHERE GRANTED_ROLE = 'CTXAPP') ctxrole,