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.3 -r1.4
--- openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl	13 Mar 2002 22:50:53 -0000	1.3
+++ openacs-4/packages/acs-bootstrap-installer/db-init-checks-oracle.tcl	17 Mar 2003 20:18:32 -0000	1.4
@@ -9,7 +9,7 @@
     upvar $errors my_errors
     upvar $error_p my_error_p
 
-    foreach pool [nsv_get db_available_pools .] {
+    foreach pool [db_available_pools] {
         if { [catch { set db [ns_db gethandle -timeout 15 $pool]}] || ![string compare $db ""] } {
             # This should never happened - we were able to grab a handle previously, why not now?
             append my_errors "(db_bootstrap_checks) Internal error accessing pool \"$pool\".<br>"