Implemented WSF_CHECKBOX_CONTROL, added id attribute to rendering of WSF_CONTROL

2013-09-05 17:16:56 +02:00
parent edce18fb1f
commit f506d9e925
6 changed files with 93 additions and 12 deletions
--- a/library/server/wsf_html/webcontrol/wsf_text_control.e
+++ b/library/server/wsf_html/webcontrol/wsf_text_control.e
@@ -9,8 +9,6 @@ class

 inherit

-	WSF_CONTROL
-
 	WSF_VALUE_CONTROL [STRING]

 create
@@ -63,7 +61,7 @@ feature -- Implementation

 	render: STRING
 		do
-			Result := render_tag ("", "value=%"" + text + "%"")
+			Result := render_tag ("", "type=%"text%" value=%"" + text + "%"")
 		end

 	set_text (t: STRING)