mirror of
https://github.com/dillonkearns/elm-pages-v3-beta.git
synced 2024-12-23 20:03:31 +03:00
42 lines
756 B
Elm
42 lines
756 B
Elm
module Route.Hex.Hex_ exposing (Data, Model, Msg, page)
|
|
|
|
import ColorHelpers
|
|
import DataSource exposing (DataSource)
|
|
import RouteBuilder exposing (StatelessRoute, StaticPayload)
|
|
|
|
|
|
type alias Model =
|
|
{}
|
|
|
|
|
|
type alias Msg =
|
|
()
|
|
|
|
|
|
type alias RouteParams =
|
|
{ hex : String }
|
|
|
|
|
|
type alias Data =
|
|
ColorHelpers.Data
|
|
|
|
|
|
page : StatelessRoute RouteParams Data
|
|
page =
|
|
RouteBuilder.preRenderWithFallback
|
|
{ head = ColorHelpers.head toCssVal
|
|
, pages = pages
|
|
, data = ColorHelpers.data
|
|
}
|
|
|> RouteBuilder.buildNoState { view = ColorHelpers.view toCssVal }
|
|
|
|
|
|
toCssVal : RouteParams -> String
|
|
toCssVal routeParams =
|
|
"#" ++ routeParams.hex
|
|
|
|
|
|
pages : DataSource (List RouteParams)
|
|
pages =
|
|
DataSource.succeed []
|