backup/EWF
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'widget' of github.com:ynh/EWF into widget

Browse Source 
Conflicts:
	library/server/wsf_html/webcontrol/wsf_control.e
	library/server/wsf_html/webcontrol/wsf_text_control.e
This commit is contained in:
Severin Münger
2013-09-05 15:40:11 +02:00
parent ee0400463f fa35c22d2d
commit f9cc0afb9e
3 changed files with 24 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
library/server/wsf_html/webcontrol/wsf_control.e
View File

@@ -73,9 +73,20 @@ feature --EVENT HANDLING
feature
render_tag (body, attributes: STRING): STRING
render_tag(body,attributes:STRING):STRING
local
css_class_string: STRING
do
Result := "<" + tag_name + " data-name=%"" + control_name + "%" data-type=%"" + generator + "%" " + attributes
css_class_string := ""
across
css_class as c
loop
css_class_string := css_class_string + " " + c.item
end
if not css_class_string.is_empty then
css_class_string := " class=%"" + css_class_string + "%""
end
Result:="<"+tag_name+" data-name=%"" + control_name + "%" data-type=%""+generator+"%" "+attributes+css_class_string
if not body.is_empty then
Result := Result + " />"
else