auth-params ( oauth2 -- params )

Vocabulary

oauth2

Inputs

oauth2

an object

Outputs

params

an object

Definition

USING: accessors combinators make ;

IN: oauth2

: auth-params ( oauth2 -- params )
    [
        {
            [ client-id>> "client_id" ,, ]
            [ scope>> "scope" ,, ]
            [ redirect-uri>> "redirect_uri" ,, ]
            [ extra-params>> %% ]
        } cleave "code" "response_type" ,,
        "offline" "access_type" ,,
    ] { } make ;