backup/EWF
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

First working callback

Browse Source
This commit is contained in:
YNH Webdev
2013-08-28 00:04:42 +02:00
parent ef34217a6d
commit cb7f1f0ee3
7 changed files with 191 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
library/server/wsf_html/webcontrol/wsf_page_control.e
View File

@@ -59,12 +59,25 @@ feature
render
local
data: STRING
page: WSF_PAGE_RESPONSE
states: JSON_OBJECT
do
data := control.render
response.put_header ({HTTP_STATUS_CODE}.ok, <<["Content-Type", "text/html"]>>)
response.put_string ("<html><head></head><body>")
response.put_string (data)
response.put_string ("</body></html>")
create states.make
control.read_state (states)
data := "<html><head>"
data.append ("</head><body>")
data.append (control.render)
data.append ("<script type=%"text/javascript%">var states=")
data.append (states.representation)
data.append (";</script>")
data.append ("<script src=%"//ajax.googleapis.com/ajax/libs/jquery/1.10.2/jquery.min.js%"></script>")
data.append ("<script src=%"/widget.js%"></script>")
data.append ("</body></html>")
create page.make
page.put_header ({HTTP_STATUS_CODE}.ok, <<["Content-Type", "text/html"]>>)
page.set_body (data)
response.send (page)
end
get_parameter (key: STRING): detachable STRING