dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-11-28 14:34:18 +03:00
Code Issues Packages Projects Releases Wiki Activity

Simplify case expression.

Browse Source
This commit is contained in:
Dillon Kearns 2022-02-03 16:38:54 -08:00
parent c9f78e7c5f
commit 1c9d6340f1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
generator/src/Pages/Internal/Platform/Cli.elm
View File

@ -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