14 lines
346 B
Elm
14 lines
346 B
Elm
module Scylla.Api exposing (..)
|
|
import Http exposing (Header, header)
|
|
import Json.Encode as Encode
|
|
|
|
type alias ApiToken = String
|
|
type alias ApiUrl = String
|
|
|
|
basicHeaders : List Header
|
|
basicHeaders = []
|
|
|
|
authenticatedHeaders : ApiToken -> List Header
|
|
authenticatedHeaders token =
|
|
[ header "Authorization" ("Bearer " ++ token)] ++ basicHeaders
|