Index: openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl,v
diff -u -N -r1.40 -r1.41
--- openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	14 May 2018 12:49:21 -0000	1.40
+++ openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	14 May 2018 13:14:08 -0000	1.41
@@ -658,7 +658,7 @@
     Returns a list of valid database type keys.
 
 } {
-    return [lmap dbtype [ad_known_database_types] {lindex $dbtype 0}]
+    return [lmap dbtype $::acs::known_database_types {lindex $dbtype 0}]
     # return [util_memoize [list db_list db_type_keys {select db_type_key from apm_package_db_types}]]
 }