Add lamassu-admin-elm to this repo (#185)
This commit is contained in:
parent
5ee7e40872
commit
f4fc9d6328
134 changed files with 28171 additions and 83 deletions
22
lamassu-admin-elm/src/LamassuAdminServerClient.elm
Normal file
22
lamassu-admin-elm/src/LamassuAdminServerClient.elm
Normal file
|
|
@ -0,0 +1,22 @@
|
|||
module ClientServerWebsocket exposing (..)
|
||||
|
||||
import RemoteData exposing (..)
|
||||
import HttpBuilder exposing (..)
|
||||
|
||||
|
||||
-- Fetch stuff: different configurations for starters
|
||||
|
||||
|
||||
type alias NewsResponse =
|
||||
()
|
||||
|
||||
|
||||
type alias Msg =
|
||||
NewsResponse (WebData News)
|
||||
|
||||
|
||||
getNews : Cmd Msg
|
||||
getNews =
|
||||
Http.get decodeNews "/news"
|
||||
|> RemoteData.asCmd
|
||||
|> Cmd.map NewsResponse
|
||||
Loading…
Add table
Add a link
Reference in a new issue