Test the new controls

2013-09-05 17:18:46 +02:00
parent edce18fb1f
commit 225f821206
6 changed files with 24 additions and 13 deletions
--- a/library/server/wsf_html/webcontrol/wsf_control.e
+++ b/library/server/wsf_html/webcontrol/wsf_control.e
@@ -92,7 +92,7 @@ feature
 				css_classes_string := " class=%"" + css_classes_string + "%""
 			end
 			Result := "<" + tag_name + "  data-name=%"" + control_name + "%" data-type=%"" + generator + "%" " + attributes + css_classes_string
-			if body.is_empty then
+			if body.is_empty and not tag_name.is_equal("textarea") then
 				Result := Result + " />"
 			else
 				Result := Result + " >" + body + "</" + tag_name + ">"