couch-http-request ( request -- data )

Vocabulary

couchdb

Inputs

request

an object

Outputs

data

an object

Definition

USING: accessors continuations http.client json kernel ;

IN: couchdb

: couch-http-request ( request -- data )
    [ http-request ] [
        dup download-failed?
        [ response>> body>> json> <couchdb-error> throw ]
        [ rethrow ] if
    ] recover nip ;