Style demo pages

This commit is contained in:
YNH Webdev
2013-09-14 19:39:08 +02:00
parent cfe452543a
commit 6230d643c8
3 changed files with 46 additions and 0 deletions

View File

@@ -0,0 +1,40 @@
note
description: "Summary description for {WSF_STATELESS_HTML_CONTROL}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
WSF_STATELESS_HTML_CONTROL
inherit
WSF_STATELESS_CONTROL
create
make_html
feature {NONE}
make_html (t, v: STRING)
do
make ( t)
html := v
end
feature -- Implementation
render: STRING
do
Result := render_tag (html, "")
end
feature
html: STRING
end