Index: openacs-4/tcl/0-acs-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/tcl/0-acs-init.tcl,v
diff -u -N -r1.6.10.4 -r1.6.10.5
--- openacs-4/tcl/0-acs-init.tcl	11 Feb 2014 14:49:52 -0000	1.6.10.4
+++ openacs-4/tcl/0-acs-init.tcl	4 Mar 2014 12:56:46 -0000	1.6.10.5
@@ -12,7 +12,7 @@
     set ::acs::pageroot [expr {[catch {ns_server pagedir}] ? [ns_info pageroot] : [ns_server pagedir]}]
     set ::acs::tcllib [expr {[catch {ns_server tcllib}] ? [ns_info tcllib] : [ns_server tcllib]}]
     set ::acs::rootdir [file dirname [string trimright $::acs::tcllib "/"]]
-    #if {[info commands ::dbi_foreach] ne ""} { set ::acs::preferdbi 1 }
+    if {[info commands ::dbi_rows] ne ""} { set ::acs::preferdbi 1 }
 }
 
 # Determine the OpenACS root directory, which is the directory right above the