Index: openacs-4/packages/acs-templating/tcl/test/parse-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/test/parse-test-procs.tcl,v diff -u -r1.10.2.11 -r1.10.2.12 --- openacs-4/packages/acs-templating/tcl/test/parse-test-procs.tcl 2 Sep 2022 08:46:08 -0000 1.10.2.11 +++ openacs-4/packages/acs-templating/tcl/test/parse-test-procs.tcl 2 Sep 2022 14:14:40 -0000 1.10.2.12 @@ -208,6 +208,14 @@ } { # + # Other tests might already have set handlers on the + # page. Let's count them beforehand. + # + template::get_body_event_handlers + template::prepare_body_script_multirow + set starting_body_scripts [template::multirow size body_scripts] + + # # Note: we use placeholders instead of real values to better # find them in the output. # @@ -299,16 +307,15 @@ template::add_refresh_on_history_handler - set page [template::adp_include /packages/acs-templating/lib/body_scripts {}] aa_equals "Page contains exactly 11 scripts (body handlers are grouped together)" \ - [regsub -all "