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.42.2.3 -r1.42.2.4
--- openacs-4/packages/acs-templating/tcl/widget-procs.tcl 27 Feb 2007 08:51:52 -0000 1.42.2.3
+++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl 6 Mar 2007 07:42:08 -0000 1.42.2.4
@@ -72,11 +72,11 @@
} else {
- set output ""
- append output ""
+ set output ""
+ append output ""
if { ![info exists element(confirmed_p)] } {
- append output ""
+ append output ""
}
append output [select $element_reference $tag_attributes]
@@ -236,7 +236,7 @@
# include an extra hidden element to indicate that the
# value is being selected as opposed to entered
- set output "\n"
+ set output "\n"
append output [select element $tag_attributes]
}
@@ -410,7 +410,7 @@
append output " maxlength=\"$element(maxlength)\""
}
- append output " />"
+ append output " >"
}
return $output
@@ -654,7 +654,7 @@
append output " selected=\"selected\""
}
- append output ">$label
\n"
+ append output ">$label
\n"
}
}
default {