ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-11-29 12:15:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

clearer %no-token error message

Browse Source
This commit is contained in:
Anton Dyudin 2016-03-15 15:29:12 -07:00
parent 47eac6dbc7
commit 8441d6668f
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lib/oauth1.hoon
View File

@ -150,6 +150,10 @@
:: ::
++ token-exchange (post-quay exchange-url ~) ++ token-exchange (post-quay exchange-url ~)
++ token-request (post-quay token-reqs-url oauth-callback+oauth-callback ~) ++ token-request (post-quay token-reqs-url oauth-callback+oauth-callback ~)
++ identity
%+ weld
?~(usr "default identity for " "{(trip usr)}@")
(trip (join '.' (flop dom)))
:: ::
:: use token to sign authorization header. requires: :: use token to sign authorization header. requires:
:: ++ res (res-handle-reqt handle-token) :: take request token :: ++ res (res-handle-reqt handle-token) :: take request token
@ -169,7 +173,10 @@
?. ?=({{$'oauth_token' oauth-token/@t} {$'oauth_verifier' @t} $~} a) ?. ?=({{$'oauth_token' oauth-token/@t} {$'oauth_verifier' @t} $~} a)
~|(no-token+a !!) ~|(no-token+a !!)
?~ tok ?~ tok
~|(%no-secret-for-token !!) %+ mean-wall %no-secret-for-token
"""
Attempting to authorize {identity}
"""
?. =(oauth-token.tok oauth-token.q.i.a) ?. =(oauth-token.tok oauth-token.q.i.a)
~| wrong-token+[id=usr q.i.a] ~| wrong-token+[id=usr q.i.a]
~|(%multiple-tokens-unsupported !!) ~|(%multiple-tokens-unsupported !!)