ce469b6ede
Separated code to have a lib and an example. Improved design, fixed a few issues related to folder location. This is still experimental and require more work to be really friendly to use.
66 lines
1.1 KiB
Plaintext
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)
|
|
end
|
|
if not s_selectors.is_empty then
|
|
a_target.append (s_selectors)
|
|
a_target.append_character (' ')
|
|
a_target.append_character ('{')
|
|
a_target.append (c.item.style)
|
|
a_target.append_character ('}')
|
|
a_target.append_character ('%N')
|
|
end
|
|
end
|
|
end
|
|
|
|
end
|