Index: openacs-4/packages/xowiki/tcl/bootstrap-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/bootstrap-procs.tcl,v diff -u -N -r1.11.2.19 -r1.11.2.20 --- openacs-4/packages/xowiki/tcl/bootstrap-procs.tcl 25 Dec 2021 16:10:21 -0000 1.11.2.19 +++ openacs-4/packages/xowiki/tcl/bootstrap-procs.tcl 5 Jan 2022 18:00:00 -0000 1.11.2.20 @@ -547,14 +547,15 @@ if {[$line exists $__name.href] && [set href [$line set $__name.href]] ne "" } { - # use the CSS class rather from the Field than not the line $line instvar [list $__name.title title] [list $__name.target target] if {[$line exists $__name.onclick]} { set id [::xowiki::Includelet html_id $line] template::add_event_listener \ -id $id \ -script "[$line set $__name.onclick];" } + # Default class is from the field definition. To it we + # append the class coming from the line. set CSSclass ${:CSSclass} if {[$line exists $__name.CSSclass]} { set lineCSSclass [$line set $__name.CSSclass]