Extracted the WIDGET and FORM classes out of "cms" component

and build the wsf_html library which also include the previous css lib.

library/server/wsf_html/widget/wsf_widget_table_item.e

@@ -0,0 +1,78 @@
+note
+	description: "Summary description for {WSF_WIDGET_TABLE_ITEM}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_WIDGET_TABLE_ITEM
+
+inherit
+	WSF_WIDGET
+
+	WSF_WITH_HTML_ATTRIBUTE
+
+	WSF_WITH_CSS_CLASS
+
+	WSF_WITH_CSS_STYLE
+
+	ITERABLE [WSF_WIDGET]
+
+create
+	make_with_text,
+	make_with_text_and_css,
+	make_with_content
+
+feature {NONE} -- Initialization
+
+	make_with_text (a_text: READABLE_STRING_8)
+		do
+			make_with_content (create {WSF_WIDGET_TEXT}.make_with_text (a_text))
+		end
+
+	make_with_text_and_css (a_text: READABLE_STRING_8; a_css_classes: detachable ITERABLE [READABLE_STRING_8])
+		do
+			make_with_text (a_text)
+			if a_css_classes /= Void then
+				across
+					a_css_classes as c
+				loop
+					add_css_class (c.item)
+				end
+			end
+		end
+
+	make_with_content (a_widget: WSF_WIDGET)
+		do
+			content := a_widget
+		end
+
+feature -- Access
+
+	content: WSF_WIDGET
+
+feature -- Access
+
+	new_cursor: ITERATION_CURSOR [WSF_WIDGET]
+			-- Fresh cursor associated with current structure
+		local
+			lst: ARRAYED_LIST [WSF_WIDGET]
+		do
+			create lst.make (1)
+			lst.extend (content)
+			Result := lst.new_cursor
+		end
+
+feature -- Conversion
+
+	append_to_html (a_theme: WSF_THEME; a_html: STRING_8)
+		do
+			a_html.append ("<td")
+			append_css_class_to (a_html, Void)
+			append_css_style_to (a_html)
+			a_html.append_character ('>')
+			content.append_to_html (a_theme, a_html)
+			a_html.append ("</td>")
+		end
+
+end