add CMS_WIDGET_... to ease html page development.

draft/application/cms/src/widgets/cms_widget_table_column.e

@@ -0,0 +1,52 @@
+note
+	description: "Summary description for {CMS_WIDGET_COLUMN}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	CMS_WIDGET_TABLE_COLUMN
+
+inherit
+	WITH_CSS_CLASS
+
+	WITH_CSS_STYLE
+
+create
+	make
+
+feature {NONE} -- Initialization
+
+	make (i: like index)
+		do
+			index := i
+		end
+
+feature -- Access
+
+	index: INTEGER
+
+	title: detachable READABLE_STRING_32
+
+feature -- Change
+
+	set_title (t: like title)
+		do
+			title := t
+		end
+
+feature -- Conversion
+
+	append_table_header_to_html (a_theme: CMS_THEME; a_html: STRING_8)
+		do
+			a_html.append ("<th")
+			append_css_class_to (a_html, Void)
+			append_css_style_to (a_html)
+			a_html.append_character ('>')
+			if attached title as l_title then
+				a_html.append (a_theme.html_encoded (l_title))
+			end
+			a_html.append ("</th>")
+		end
+
+end