Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -N -r1.248.2.44 -r1.248.2.45
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	2 Mar 2017 16:15:01 -0000	1.248.2.44
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	5 Mar 2017 15:50:07 -0000	1.248.2.45
@@ -2568,7 +2568,7 @@
     set value [my value]
     foreach o [my options] {
       lassign $o label rep
-      set atts [my get_attributes disabled {CSSclass class}]
+      set atts [my get_attributes disabled]
       if {[my exists forced_name]} {
         set name [my forced_name]
       } {
@@ -2579,9 +2579,11 @@
       if {$value eq $rep} {
         lappend atts checked checked
       }
-      ::html::input $atts {}
-      ::html::label -for $id {
-        html::t "$label  "
+      set label_class ""
+      if {[my horizontal]} {set label_class "radio-inline"}
+      ::html::label -for $id -class $label_class {
+        ::html::input $atts {}
+        ::html::t " $label "
       }
       if {![my horizontal]} {
         html::br