diff --git a/src/Api.elm b/src/Api.elm index 2ab4f7ba..566042d4 100644 --- a/src/Api.elm +++ b/src/Api.elm @@ -67,7 +67,7 @@ alertGroupDecoder = decodeBlocks : Json.Decoder (List Block) decodeBlocks = - Json.maybe (field "blocks" (Json.list blockDecoder)) + Json.maybe (field "blocks" (Json.list blockDecoder)) |> andThen (unwrapWithDefault []) @@ -108,7 +108,7 @@ alertDecoder = decodeSilenced : Decoder Bool decodeSilenced = - Json.maybe (field "silenced" Json.int) + Json.maybe (field "silenced" Json.int) |> andThen (\val -> case val of