Index: openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl,v
diff -u -r1.28.2.22 -r1.28.2.23
--- openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl	13 Dec 2021 13:35:24 -0000	1.28.2.22
+++ openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl	14 Dec 2021 09:51:11 -0000	1.28.2.23
@@ -1258,7 +1258,7 @@
     } {
         # Retrieve dependencies for every package known to the system
         foreach package_key [db_list get_packages {
-            select package_key from apm_packages
+            select package_key from apm_package_types
         }] {
             lappend dependencies($package_key) \
                 $package_key \
Index: openacs-4/packages/acs-tcl/tcl/test/apm-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/Attic/apm-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/acs-tcl/tcl/test/apm-procs.tcl	13 Dec 2021 14:10:31 -0000	1.1.2.1
+++ openacs-4/packages/acs-tcl/tcl/test/apm-procs.tcl	14 Dec 2021 09:51:10 -0000	1.1.2.2
@@ -14,7 +14,7 @@
         expected result from the data model.
     } {
         foreach package_key [db_list get_packages {
-            select package_key from apm_packages
+            select package_key from apm_package_types
         }] {
             set db_dependencies [db_list get_dependencies {
                 with recursive dependencies as