Fixed rendering, added navbar

This commit is contained in:
Severin Münger
2013-09-13 23:24:49 +02:00
parent 15676a7c9e
commit 09544ba6d2
8 changed files with 96 additions and 23 deletions

View File

@@ -22,11 +22,13 @@ feature
feature {NONE} -- Initialization
make_navbar (brand: STRING)
make_navbar (b: STRING)
local
container: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
header: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
collapse_button: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
brand: WSF_BASIC_CONTROL
icon_bar: WSF_BASIC_CONTROL
do
make_multi_control
add_class ("navbar navbar-inverse navbar-fixed-top")
@@ -34,11 +36,23 @@ feature {NONE} -- Initialization
create header.make_multi_control
create collapse_button.make_with_tag_name ("button")
create collapse.make_multi_control
create nav.make_multi_control
create nav.make_with_tag_name ("ul")
create brand.make_control ("a")
create icon_bar.make_control ("span")
container.add_class ("container")
header.add_class ("navbar-header")
collapse_button.add_class ("navbar-toggle")
collapse_button.set_attributes ("data-target=%".navbar-collapse%" data-toggle=%"collapse%" type=%"button%"")
icon_bar.add_class ("icon-bar")
collapse_button.add_control (icon_bar)
collapse_button.add_control (icon_bar)
collapse_button.add_control (icon_bar)
--collapse_button.set_attributes ("data-target=%".navbar-collapse%" data-toggle=%"collapse%" type=%"button%"")
brand.add_class ("navbar-brand")
brand.set_attributes ("href=%"#%"")
brand.set_content (b)
header.add_control (collapse_button)
header.add_control (brand)
nav.add_class ("nav navbar-nav")
collapse.add_class ("navbar-collapse")
collapse.add_control (nav)
container.add_control (header)