make-token-params ( params quot -- assoc )

Vocabulary

oauth1.private

Inputs

params	an object
quot	an object

Outputs

assoc

an object

Definition

USING: accessors kernel make ;

IN: oauth1.private

: make-token-params ( params quot -- assoc )
    '[
        "1.0" "oauth_version" ,,
        "HMAC-SHA1" "oauth_signature_method" ,, _ [
            [ consumer-token>> key>> "oauth_consumer_key" ,, ]
            [ timestamp>> "oauth_timestamp" ,, ]
            [ nonce>> "oauth_nonce" ,, ] tri
        ] bi
    ] H{ } make ; inline