Adapted rendering of multi control

This commit is contained in:
Severin Münger
2013-09-05 15:12:22 +02:00
parent c50a46206d
commit 422b73058c
2 changed files with 9 additions and 7 deletions

View File

@@ -72,6 +72,7 @@ feature --EVENT HANDLING
end end
feature feature
render_tag (body, attributes: STRING): STRING render_tag (body, attributes: STRING): STRING
do do
Result := "<" + tag_name + " data-name=%"" + control_name + "%" data-type=%"" + generator + "%" " + attributes Result := "<" + tag_name + " data-name=%"" + control_name + "%" data-type=%"" + generator + "%" " + attributes

View File

@@ -103,6 +103,7 @@ feature
loop loop
Result := c.item.render + Result Result := c.item.render + Result
end end
Result := render_tag (Result, "")
end end
add_control (c: WSF_CONTROL) add_control (c: WSF_CONTROL)