update
This commit is contained in:
@ -7,11 +7,14 @@ import FatalError exposing (FatalError)
|
||||
import Head
|
||||
import Head.Seo as Seo
|
||||
import Html.Styled exposing (..)
|
||||
import Html.Styled.Attributes exposing (style)
|
||||
import Link exposing (Link)
|
||||
import Json.Decode as Decode exposing (Decoder)
|
||||
import Json.Decode.Extra
|
||||
import Pages.Url
|
||||
import PagesMsg exposing (PagesMsg)
|
||||
import RouteBuilder exposing (App, StatelessRoute)
|
||||
import Route
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
@ -131,11 +134,18 @@ view :
|
||||
-> Shared.Model
|
||||
-> View (PagesMsg Msg)
|
||||
view app shared =
|
||||
let rendered = (app.data.body |> Markdown.Renderer.render TailwindMarkdownRenderer.renderer) |> Result.withDefault []
|
||||
in
|
||||
{ title = app.data.metadata.title
|
||||
, body =
|
||||
(app.data.body
|
||||
|> Markdown.Renderer.render TailwindMarkdownRenderer.renderer
|
||||
|> Result.withDefault []
|
||||
)
|
||||
[ Link.link (Link.internal (Route.Index))
|
||||
[ style "margin" "10px" ]
|
||||
[ text "Home" ]
|
||||
, Link.link (Link.internal (Route.Osx__Slug_ { slug = "" }))
|
||||
[ style "margin" "10px" ]
|
||||
[ text "OSX Index" ]
|
||||
, br [] []
|
||||
, h1 [] [ text app.data.metadata.title ]
|
||||
, div [] rendered
|
||||
]
|
||||
}
|
||||
|
||||
|
Reference in New Issue
Block a user