Index: openacs-4/packages/acs-templating/tcl/widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/widget-procs.tcl,v
diff -u -r1.51 -r1.52
--- openacs-4/packages/acs-templating/tcl/widget-procs.tcl	27 Oct 2014 16:40:13 -0000	1.51
+++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl	10 Jun 2015 12:09:58 -0000	1.52
@@ -926,7 +926,7 @@
     foreach option $options {
 	if {$count == 0} {
 	    # answer descriptions in a list: {{desc1 no_of_answers} {desc2 no_of_answers} ...}
-	    append output "<tr align=center><td></td><td></td>"
+	    append output "<tr align='center'><td></td><td></td>"
 	    foreach answer_desc $option {
 		set answer_description [lindex $answer_desc 0]
 		set no_of_answers [lindex $answer_desc 1]
@@ -1168,7 +1168,7 @@
     set output {}
 
     # edit mode
-    set radio_text "<input type=radio name=$element(name)"
+    set radio_text "<input type='radio' name='$element(name)'"
 
     foreach name [array names attributes] {
         if {$attributes($name) eq {}} {