Change parameter type

This commit is contained in:
YNH Webdev
2013-12-31 21:25:01 +01:00
parent 1ae44e74e7
commit b39dd5c40d
17 changed files with 153 additions and 31 deletions

View File

@@ -49,7 +49,7 @@ feature -- State
feature -- Callback
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable STRING)
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable ANY)
do
Precursor {WSF_INPUT_CONTROL} (cname, event, event_parameter)
if cname[1].same_string (control_name) and event.same_string ("autocomplete") then

View File

@@ -54,7 +54,7 @@ feature --Event handling
change_event := e
end
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable STRING)
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable ANY)
do
if Current.control_name.same_string (cname[1]) and attached change_event as cevent then
if event.same_string ("change") then

View File

@@ -49,7 +49,7 @@ feature --Event handling
change_event := e
end
handle_callback (cname: LIST [STRING]; event: STRING; event_parameter: detachable STRING)
handle_callback (cname: LIST [STRING]; event: STRING; event_parameter: detachable ANY)
do
if Current.control_name.same_string (cname [1]) and attached change_event as cevent then
if event.same_string ("change") then
@@ -58,6 +58,17 @@ feature --Event handling
end
end
feature -- Upload
start_upload
local
upload: WSF_JSON_OBJECT
do
create upload.make
upload.put_string ("start_upload", "type")
actions.add (upload)
end
feature -- Implementation
value: detachable WSF_PENDING_FILE

View File

@@ -53,7 +53,7 @@ feature --Event handling
change_event := e
end
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable STRING)
handle_callback (cname: LIST[STRING]; event: STRING; event_parameter: detachable ANY)
do
if Current.control_name.same_string (cname[1]) and attached change_event as cevent then
if event.same_string ("change") then