diff --git a/ui/src/Data/Date.elm b/ui/src/Data/Date.elm index 1765dc5..2595f4c 100644 --- a/ui/src/Data/Date.elm +++ b/ui/src/Data/Date.elm @@ -4,8 +4,8 @@ import Json.Decode as Decode exposing (..) import Time exposing (Posix) -{-| Decode a POSIX milliseconds timestamp. Currently faked until backend API is updated. +{-| Decode a POSIX milliseconds timestamp. -} date : Decoder Posix date = - succeed (Time.millisToPosix 0) + int |> andThen (Time.millisToPosix >> succeed) diff --git a/ui/src/Data/Message.elm b/ui/src/Data/Message.elm index 4f15ee4..acd77fa 100644 --- a/ui/src/Data/Message.elm +++ b/ui/src/Data/Message.elm @@ -36,7 +36,7 @@ decoder = |> optional "from" string "" |> required "to" (list string) |> optional "subject" string "" - |> required "date" date + |> required "posix-millis" date |> required "size" int |> required "seen" bool |> required "text" string diff --git a/ui/src/Data/MessageHeader.elm b/ui/src/Data/MessageHeader.elm index aa7b1b1..b791303 100644 --- a/ui/src/Data/MessageHeader.elm +++ b/ui/src/Data/MessageHeader.elm @@ -26,6 +26,6 @@ decoder = |> optional "from" string "" |> required "to" (list string) |> optional "subject" string "" - |> required "date" date + |> required "posix-millis" date |> required "size" int |> required "seen" bool