Adjust widgetapp
This commit is contained in:
@@ -20,14 +20,14 @@ create
|
|||||||
|
|
||||||
feature --States
|
feature --States
|
||||||
|
|
||||||
state: JSON_OBJECT
|
state: WSF_JSON_OBJECT
|
||||||
-- Return state which contains the current html and if there is an event handle attached
|
-- Return state which contains the current html and if there is an event handle attached
|
||||||
do
|
do
|
||||||
Result := Precursor
|
Result := Precursor
|
||||||
Result.put (create {JSON_STRING}.make_json (query), create {JSON_STRING}.make_json ("query"))
|
Result.put_string (query, create {JSON_STRING}.make_json ("query"))
|
||||||
end
|
end
|
||||||
|
|
||||||
set_state (new_state: JSON_OBJECT)
|
set_state (new_state: WSF_JSON_OBJECT)
|
||||||
do
|
do
|
||||||
Precursor (new_state)
|
Precursor (new_state)
|
||||||
if attached {JSON_STRING} new_state.item (create {JSON_STRING}.make_json ("query")) as new_query then
|
if attached {JSON_STRING} new_state.item (create {JSON_STRING}.make_json ("query")) as new_query then
|
||||||
|
|||||||
Reference in New Issue
Block a user