Change wsf control

This commit is contained in:
YNH Webdev
2013-09-05 14:48:19 +02:00
parent ae9952a941
commit 633243311d
2 changed files with 8 additions and 2 deletions

View File

@@ -59,7 +59,7 @@ feature
render: STRING render: STRING
do do
Result := "<button data-name=%"" + control_name + "%" data-type=%"WSF_BUTTON_CONTROL%">" + text + "</button>" Result := "<button data-name=%"" + control_name + "%" data-type=%"WSF_BUTTON_CONTROL%">" + generator + text + "</button>"
end end
set_text (t: STRING) set_text (t: STRING)

View File

@@ -11,11 +11,17 @@ feature
control_name: STRING control_name: STRING
tag_name: STRING
css_class: LINKED_LIST[STRING]
feature {NONE} feature {NONE}
make (n: STRING) make (n,a_tag_name: STRING)
do do
control_name := n control_name := n
tag_name := a_tag_name
create css_class.make
create state_changes.make create state_changes.make
ensure ensure
attached state_changes attached state_changes