note description: "Summary description for {HTML_TABLE_TEMPLATE}." author: "" date: "$Date$" revision: "$Revision$" class HTML_TABLE_TEMPLATE inherit SHARED_TEMPLATE_CONTEXT undefine default_create end ANY redefine default_create end create default_create feature {NONE} -- Initialization default_create -- Initialize `Current'. local p: PATH do create p.make_current p:=p.appended ("/tpl") set_template_folder (p) set_template_file_name ("html_table.tpl") template.add_value (users,"users") template_context.enable_verbose template.analyze template.get_output if attached template.output as l_output then output := l_output print (output) end end feature -- Status output: detachable STRING set_template_folder (v: PATH) do template_context.set_template_folder (v) end set_template_file_name (v: STRING) do create template.make_from_file (v) end set_template (v: like template) do template := v end template: TEMPLATE_FILE feature -- feature {NONE} -- Implementation users : LIST[USER] local user : USER do create {ARRAYED_LIST[USER]}Result.make(5) create user.make ("John","1234312") Result.force(user) create user.make ("Peter","123456") Result.force(user) create user.make ("Mike","2343221") Result.force(user) end end