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.26 -r1.14.2.27 --- openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 18 Aug 2024 17:34:39 -0000 1.14.2.26 +++ openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 25 Aug 2024 17:14:32 -0000 1.14.2.27 @@ -57,7 +57,7 @@ } { ::xowf::test::require_test_instance - + set instance $_xowf_test_instance_name set testfolder .testfolder set locale [lang::system::locale] @@ -192,7 +192,7 @@ interface. } { ::xowf::test::require_test_instance - + set instance $_xowf_test_instance_name set testfolder .testfolder set locale [lang::system::locale] @@ -353,7 +353,12 @@ ::xowf::WorkflowConstruct instforward true set "" 1 ::xowf::WorkflowConstruct instforward false set "" 0 - ::xowf::WorkflowConstruct x + # + # Silence message "cannot determine wf_context from call-stack" + # + aa_silence_log_entries -severities warning { + ::xowf::WorkflowConstruct x + } aa_equals "non-conditional test with empty" [x get_value ""] "" aa_equals "non-conditional test with nonempty scalar" [x get_value "a"] "a" @@ -378,7 +383,7 @@ } { ::xowf::test::require_test_instance - + aa_run_with_teardown -rollback -test_code { set instance $_xowf_test_instance_name set testfolder .testfolder