set-post-data-headers ( header post-data -- header )

Vocabulary

http.client.post-data

Inputs

header	an object
post-data	an object

Outputs

header

an object

Definition

USING: accessors assocs http.client.post-data.private kernel ;

IN: http.client.post-data

: set-post-data-headers ( header post-data -- header )
    [ data>> (set-post-data-headers) ]
    [ content-type>> "content-type" pick set-at ] bi ;