$head_title

note description: "Summary description for {CMS_HTML_TEMPLATE}." author: "" date: "$Date$" revision: "$Revision$" class DEFAULT_CMS_HTML_TEMPLATE inherit CMS_HTML_TEMPLATE DEFAULT_CMS_TEMPLATE create make feature {NONE} -- Initialization make (t: DEFAULT_CMS_THEME) do theme := t create variables.make (0) end variables: STRING_TABLE [detachable ANY] feature -- Access register (v: STRING_8; k: STRING_8) do variables.force (v, k) end theme: DEFAULT_CMS_THEME prepare (page: CMS_HTML_PAGE) do variables.make (10) across page.variables as ic loop variables.force (ic.item, ic.key) end if attached page.title as l_title then variables.force (l_title, "title") variables.force (l_title, "head_title") else variables.force ("", "title") variables.force ("", "head_title") end variables.force (page.language, "language") variables.force (page.head_lines_to_string, "head_lines") end to_html (page: CMS_HTML_PAGE): STRING do -- Process html generation create Result.make_from_string (template) apply_template_engine (Result) end feature {NONE} -- Implementation template: STRING once Result := "[ $head $head_title $styles $scripts $head_lines $page_top $page $page_bottom ]" end note copyright: "2011-2014, Jocelyn Fiat, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software 5949 Hollister Ave., Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end