Files
EWF/draft/application/cms/src/kernel/cms_css.e
2013-01-31 16:20:38 +01:00

66 lines
1.1 KiB
Plaintext

note
description: "Summary description for {CMS_CSS}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
CMS_CSS
create
make
feature {NONE} -- Initialization
make
do
create items.make (3)
end
feature -- Access
items: ARRAYED_LIST [TUPLE [selectors: ITERABLE [CMS_CSS_SELECTOR]; style: CMS_CSS_STYLE]]
feature -- Conversion
string: READABLE_STRING_8
local
s: STRING_8
do
create s.make (64)
append_to (s)
Result := s
end
append_to (a_target: STRING_8)
local
s: STRING_8
s_selectors: STRING_8
do
create s.make (64)
create s_selectors.make (10)
across
items as c
loop
s_selectors.wipe_out
across
c.item.selectors as cs
loop
if not s_selectors.is_empty then
s_selectors.append_character (',')
end
s_selectors.append (cs.item.string)
end
if not s_selectors.is_empty then
a_target.append (s_selectors)
a_target.append_character (' ')
a_target.append_character ('{')
c.item.style.append_text_to (a_target)
a_target.append_character ('}')
a_target.append_character ('%N')
end
end
end
end