Index: openacs-4/packages/search/tcl/test/search-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/search/tcl/test/search-procs.tcl,v diff -u -r1.1.2.9 -r1.1.2.10 --- openacs-4/packages/search/tcl/test/search-procs.tcl 14 Jun 2023 08:40:24 -0000 1.1.2.9 +++ openacs-4/packages/search/tcl/test/search-procs.tcl 24 Aug 2024 13:11:09 -0000 1.1.2.10 @@ -91,7 +91,7 @@ } \ extra_args { - Test the api dealing with extra args introduced by the + Test the API dealing with extra args introduced by the full-text engine in use. } { @@ -156,9 +156,12 @@ } } - aa_true "Invalud event throws an error" [catch { + ns_logctl severity notice 0 + ns_logctl severity "Debug(sql)" 0 + aa_true "Invalid event throws an error" [catch { search::queue -object_id $object_id -event BOGUS - }] + }] + } aa_register_case \