Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v diff -u -r1.60.2.13 -r1.60.2.14 --- openacs-4/packages/acs-templating/tcl/list-procs.tcl 29 Aug 2016 09:23:03 -0000 1.60.2.13 +++ openacs-4/packages/acs-templating/tcl/list-procs.tcl 2 Oct 2016 16:40:25 -0000 1.60.2.14 @@ -348,10 +348,21 @@ error "You cannot have bulk_actions without providing a key for list '$name'" } # Create the checkbox element - set label [subst {}] + set label [subst { + + }] + template::add_event_listener \ + -id $name-bulkaction-control \ + -preventdefault=false \ + -script [subst {acs_ListCheckAll('[ns_quotehtml $name]', this.checked);}] + template::add_event_listener \ + -id $name-bulkaction-control \ + -event keypress \ + -preventdefault=false \ + -script [subst {acs_ListCheckAll('[ns_quotehtml $name]', this.checked);}] + if {[info exists ::__csrf_token]} { - append label \n [subst {}] + append label [subst {}] } # We only ulevel 1 here, because we want the subst to be done in this namespace