Begin working on Http requests.
This commit is contained in:
15
src/Scylla/Api.elm
Normal file
15
src/Scylla/Api.elm
Normal file
@@ -0,0 +1,15 @@
|
||||
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 =
|
||||
[ header "Content-Type" "application/json"
|
||||
]
|
||||
|
||||
authenticatedHeaders : ApiToken -> List Header
|
||||
authenticatedHeaders token =
|
||||
[ header "Authorization" ("Bearer " ++ token)] ++ basicHeaders
|
||||
Reference in New Issue
Block a user