Index: openacs-4/packages/acs-tcl/tcl/test/object-test-case-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/object-test-case-procs.tcl,v
diff -u -r1.9.2.1 -r1.9.2.2
--- openacs-4/packages/acs-tcl/tcl/test/object-test-case-procs.tcl	2 Sep 2019 16:19:56 -0000	1.9.2.1
+++ openacs-4/packages/acs-tcl/tcl/test/object-test-case-procs.tcl	2 Sep 2019 16:22:07 -0000	1.9.2.2
@@ -12,6 +12,7 @@
         acs_object::get_element
         acs_object::set_context_id
         db_name
+        db_nextval
     } acs_object_procs_test \
     {
         test the acs_object::* procs
Index: openacs-4/packages/acs-tcl/tcl/test/test-permissions-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/test-permissions-procs.tcl,v
diff -u -r1.7 -r1.7.2.1
--- openacs-4/packages/acs-tcl/tcl/test/test-permissions-procs.tcl	10 Aug 2018 09:26:07 -0000	1.7
+++ openacs-4/packages/acs-tcl/tcl/test/test-permissions-procs.tcl	2 Sep 2019 16:22:07 -0000	1.7.2.1
@@ -14,6 +14,7 @@
         permission::permission_p
         permission::revoke
         site_node::instantiate_and_mount
+        db_nextval
     } \
     ad_proc_permission_grant_and_revoke {
 
@@ -96,6 +97,7 @@
         permission::permission_p
         permission::revoke
         site_node::instantiate_and_mount
+        db_nextval
     } \
     ad_proc_permission_permission_p {