Vocabulary
oauth1.private

Inputs
paramsan object
quotan object


Outputs
assocan object


Definition


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