ATTENTION: ugly append_attributes added to stateless control, replaces set_attributes -> maybe improve

This commit is contained in:
severin
2014-01-04 10:51:07 +01:00
parent 37aac7053a
commit e675e8aad9
2 changed files with 10 additions and 4 deletions

View File

@@ -45,6 +45,7 @@ feature -- Change
li: WSF_MULTI_CONTROL [WSF_STATELESS_CONTROL] li: WSF_MULTI_CONTROL [WSF_STATELESS_CONTROL]
do do
create li.make_with_tag_name ("li") create li.make_with_tag_name ("li")
li.append_attribute ("role=%"presentation%"")
li.add_control (c) li.add_control (c)
dropdown_menu.add_control (li) dropdown_menu.add_control (li)
end end
@@ -59,7 +60,7 @@ feature -- Change
add_divider add_divider
do do
dropdown_menu.add_control (create {WSF_BASIC_CONTROL}.make_with_body_class ("li", "", "divider", "")) dropdown_menu.add_control (create {WSF_BASIC_CONTROL}.make_with_body_class ("li", "role=%"menuitem%"", "divider", ""))
end end
feature -- Properties feature -- Properties

View File

@@ -43,10 +43,15 @@ feature -- Change
css_classes.prune (cla) css_classes.prune (cla)
end end
set_attributes (a: STRING) append_attribute (a: STRING)
-- Set the attributes of this control -- Adds the specified attribute to the attribute string of this control
do do
attributes := a if attached attributes as attr then
attr.append (" ")
attr.append (a)
else
attributes := a
end
end end
feature -- Rendering feature -- Rendering