mirror of
https://github.com/dillonkearns/elm-pages-v3-beta.git
synced 2024-12-27 22:01:48 +03:00
Inline let binding and rename param.
This commit is contained in:
parent
39b83767b6
commit
09cc5f3247
@ -862,21 +862,14 @@ staticResponseForPage :
|
||||
}
|
||||
)
|
||||
)
|
||||
staticResponseForPage siteMetadata viewFn =
|
||||
-- TODO need all Routes here, and their page paths
|
||||
-- need to start with hardcoding the static URLs
|
||||
-- eventually, getStaticPaths equivalent
|
||||
siteMetadata
|
||||
staticResponseForPage staticRoutes viewFn =
|
||||
staticRoutes
|
||||
|> List.map
|
||||
(\( pagePath, route ) ->
|
||||
let
|
||||
thing =
|
||||
viewFn []
|
||||
{ path = pagePath
|
||||
, frontmatter = route
|
||||
}
|
||||
in
|
||||
Ok ( pagePath, thing )
|
||||
Ok
|
||||
( pagePath
|
||||
, viewFn [] { path = pagePath, frontmatter = route }
|
||||
)
|
||||
)
|
||||
|> combine
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user