mirror of
https://github.com/dillonkearns/elm-pages-v3-beta.git
synced 2024-12-01 07:45:22 +03:00
Simplify case expression.
This commit is contained in:
parent
c9f78e7c5f
commit
1c9d6340f1
@ -844,8 +844,8 @@ nextStepToEffect site contentCache config model ( updatedStaticResponsesModel, n
|
||||
-- TODO handle error?
|
||||
Bytes.Encode.encode (Bytes.Encode.unsignedInt8 0)
|
||||
in
|
||||
case Result.map3 (\a b c -> ( a, b, c )) pageFoundResult renderedResult siteDataResult of
|
||||
Ok ( pageFound, renderedOrApiResponse, siteData ) ->
|
||||
case renderedResult of
|
||||
Ok renderedOrApiResponse ->
|
||||
case renderedOrApiResponse of
|
||||
PageServerResponse.RenderPage responseInfo rendered ->
|
||||
{ route = payload.path |> Path.toRelative
|
||||
|
Loading…
Reference in New Issue
Block a user