all repos

onasty @ 327757c9371a333d3436f0a204677742a04236cf

a one-time notes service

onasty/web/src/Shared/Msg.elm(view raw)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
module Shared.Msg exposing (Msg(..))

import Data.Credentials exposing (Credentials)
import Http
import Time


type Msg
    = GotZone Time.Zone
      -- Auth
    | Logout
    | SignedIn Credentials
      -- Session
    | CheckTokenExpiration Time.Posix
    | TriggerTokenRefresh
    | ApiRefreshTokensResponded (Result Http.Error Credentials)