billstclair/elm-mastodon

Pass scopes to login

Opened this issue · 0 comments

The login command should take scopes as an argument. The example should have a "Read Only" checkbox for login.

type Scopes
  = AllScopes
  | ReadOnlyScopes
  | ScopesList (List Scope)

type Scope
  = ReadScope
  | WriteScope
  | CustomScope String