Move project to wsf_js_widget

2013-09-20 19:19:34 +02:00
parent 6c0eeebf27
commit 24474e6b31
43 changed files with 65 additions and 22 deletions
--- a/library/server/wsf_js_widget/navbar/wsf_navbar_control.e
+++ b/library/server/wsf_js_widget/navbar/wsf_navbar_control.e
@@ -0,0 +1,89 @@
+note
+	description: "Summary description for {WSF_NAVBAR_CONTROL}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_NAVBAR_CONTROL
+
+inherit
+
+	WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
+
+create
+	make_navbar
+
+feature
+
+	collapse: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
+
+	nav: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
+
+	nav_right: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
+
+feature
+
+	add_element (c: WSF_STATELESS_CONTROL)
+		do
+			add_element_to_nav (c, nav)
+		end
+
+	add_element_right (c: WSF_STATELESS_CONTROL)
+		do
+			add_element_to_nav (c, nav_right)
+		end
+
+	add_element_to_nav (e: WSF_STATELESS_CONTROL; n: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL])
+		local
+			li: WSF_STATELESS_MULTI_CONTROL [WSF_STATELESS_CONTROL]
+		do
+			create li.make_with_tag_name ("li")
+			li.add_control (e)
+			n.add_control (li)
+		end
+
+feature {NONE} -- Initialization
+
+	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")
+			create container.make_multi_control
+			create header.make_multi_control
+			create collapse_button.make_with_tag_name ("button")
+			create collapse.make_multi_control
+			create nav.make_with_tag_name ("ul")
+			create nav_right.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")
+			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")
+			nav_right.add_class ("nav navbar-nav navbar-right")
+			collapse.add_class ("navbar-collapse")
+			collapse.add_control (nav)
+			collapse.add_control (nav_right)
+			container.add_control (header)
+			container.add_control (collapse)
+			add_control (container)
+		end
+
+end