http-put-json ( post-data url -- response json )

Vocabulary

http.json

Inputs

post-data	an object
url	an object

Outputs

response	an object
json	an object

Definition

USING: accessors kernel ;

IN: http.json

: http-put-json ( post-data url -- response json )
    [ <json-post-data> ] dip "PUT" <json-request>
    swap >>post-data http-request-json ;