Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v
diff -u -r1.148.2.21 -r1.148.2.22
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	2 Jul 2020 08:31:17 -0000	1.148.2.21
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	14 Jul 2020 19:43:09 -0000	1.148.2.22
@@ -1023,7 +1023,7 @@
         }
       }
 
-      if {[file readable $sql_file]} {
+      if {[ad_file readable $sql_file]} {
         :log "Sourcing '$sql_file'"
         db_source_sql_file $sql_file
         ::xo::db::Class create_all_functions