Index: openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl,v diff -u -r1.1.2.8 -r1.1.2.9 --- openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 18 Jan 2021 14:02:18 -0000 1.1.2.8 +++ openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 7 Feb 2021 18:46:56 -0000 1.1.2.9 @@ -20,6 +20,13 @@ "::xowiki::Page instproc www-revisions" "::xowiki::Page instproc www-view" "::xowiki::Page instproc www-create-new" + "::xo::Package instproc require_root_folder" + "::xo::PackageMgr instproc initialize" + "::xowiki::Page instproc pretty_link" + "::xowiki::Page instproc render" + "::xowiki::Page instproc is_folder_page" + "::xowiki::FormPage instproc is_folder_page" + "xowiki::FormPage instproc property" site_node::exists_p site_node::unmount site_node::delete Index: openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl,v diff -u -r1.1.2.37 -r1.1.2.38 --- openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl 6 Feb 2021 20:43:14 -0000 1.1.2.37 +++ openacs-4/packages/xowiki/tcl/test/xowiki-test-procs.tcl 7 Feb 2021 18:46:56 -0000 1.1.2.38 @@ -22,6 +22,7 @@ -procs { "::xowiki::Page instproc find_slot" "::xo::db::CrItem instproc update_attribute_from_slot" + "::xo::db::CrClass proc get_instance_from_db" } \ slot_interactions { Test slot interactions @@ -112,9 +113,12 @@ aa_register_case \ -cats {smoke production_safe} \ -procs { + "::xo::db::CrClass proc get_instance_from_db" + "::xo::db::CrClass proc lookup" + "::xowiki::Package instproc item_info_from_url" "::xowiki::Package instproc item_ref" + "::xowiki::Package instproc lookup" "::xowiki::Package instproc resolve_page" - "::xowiki::Package instproc item_info_from_url" "::xowiki::Page instproc create_link" } \ path_resolve { @@ -138,7 +142,7 @@ set testfolder_id [::$package_id lookup -parent_id $root_folder_id -name $testfolder] aa_true "can resolve '$testfolder'" {$testfolder_id > 0} - + # # Force the system locale to en_US. The value is # automatically reset to the previous value, since we are Index: openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl,v diff -u -r1.14.2.11 -r1.14.2.12 --- openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 8 Dec 2020 15:41:52 -0000 1.14.2.11 +++ openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 7 Feb 2021 18:47:57 -0000 1.14.2.12 @@ -16,9 +16,10 @@ } aa_register_case -init_classes {xowf_require_test_instance} -cats {web} -procs { + "::xo::Package instproc reply_to_user" "::xowf::Package instproc initialize" "::xowiki::Package instproc invoke" - "::xo::Package instproc reply_to_user" + "::xowiki::require_parameter_page" } create_folder_with_page { Create a folder in an xowf instance with a form page and edit this @@ -110,6 +111,7 @@ "::xowf::WorkflowPage instproc www-edit" "::xowf::WorkflowPage instproc www-view" "::xowiki::Package instproc invoke" + "::xowiki::FormPage instproc www-edit" } create_workflow_with_instance { Create an xowf workflow and a instance in a folder.