fix head tags

This commit is contained in:
nganhkhoa 2023-11-06 00:20:32 +07:00
parent 591b6e56df
commit b559885ed4
6 changed files with 29 additions and 28 deletions

View File

@ -62,16 +62,16 @@ head :
head app = head app =
Seo.summary Seo.summary
{ canonicalUrlOverride = Nothing { canonicalUrlOverride = Nothing
, siteName = "elm-pages" , siteName = "nganhkhoa blogs"
, image = , image =
{ url = Pages.Url.external "TODO" { url = Pages.Url.external ""
, alt = "elm-pages logo" , alt = "nganhkhoa blogs"
, dimensions = Nothing , dimensions = Nothing
, mimeType = Nothing , mimeType = Nothing
} }
, description = "TODO" , description = "blogs"
, locale = Nothing , locale = Nothing
, title = "TODO title" -- metadata.title -- TODO , title = "nganhkhoa blogs"
} }
|> Seo.website |> Seo.website
@ -81,7 +81,7 @@ view :
-> Shared.Model -> Shared.Model
-> View msg -> View msg
view app shared = view app shared =
{ title = "title" { title = "nganhkhoa blogs"
, body = app.data , body = app.data
|> List.map renderBlogItem |> List.map renderBlogItem
} }

View File

@ -112,16 +112,16 @@ head :
head app = head app =
Seo.summary Seo.summary
{ canonicalUrlOverride = Nothing { canonicalUrlOverride = Nothing
, siteName = "elm-pages" , siteName = "nganhkhoa blogs"
, image = , image =
{ url = Pages.Url.external "TODO" { url = Pages.Url.external ""
, alt = "elm-pages logo" , alt = app.data.metadata.title
, dimensions = Nothing , dimensions = Nothing
, mimeType = Nothing , mimeType = Nothing
} }
, description = "TODO" , description = ""
, locale = Nothing , locale = Nothing
, title = "TODO title" -- metadata.title -- TODO , title = app.data.metadata.title
} }
|> Seo.website |> Seo.website
@ -131,7 +131,7 @@ view :
-> Shared.Model -> Shared.Model
-> View (PagesMsg Msg) -> View (PagesMsg Msg)
view app shared = view app shared =
{ title = "title" { title = app.data.metadata.title
, body = , body =
(app.data.body (app.data.body
|> Markdown.Renderer.render TailwindMarkdownRenderer.renderer |> Markdown.Renderer.render TailwindMarkdownRenderer.renderer

View File

@ -82,7 +82,7 @@ view :
-> Shared.Model -> Shared.Model
-> View (PagesMsg Msg) -> View (PagesMsg Msg)
view app shared = view app shared =
{ title = "Anh Khoa Nguyen" { title = "nganhkhoa"
, body = , body =
[ img [Attributes.src "/nganhkhoa.png"] [] [ img [Attributes.src "/nganhkhoa.png"] []
, withSpacing (p []) , withSpacing (p [])

View File

@ -63,16 +63,16 @@ head :
head app = head app =
Seo.summary Seo.summary
{ canonicalUrlOverride = Nothing { canonicalUrlOverride = Nothing
, siteName = "elm-pages" , siteName = "nganhkhoa osx series"
, image = , image =
{ url = Pages.Url.external "TODO" { url = Pages.Url.external ""
, alt = "elm-pages logo" , alt = "nganhkhoa osx series"
, dimensions = Nothing , dimensions = Nothing
, mimeType = Nothing , mimeType = Nothing
} }
, description = "TODO" , description = "An OSX series"
, locale = Nothing , locale = Nothing
, title = "TODO title" -- metadata.title -- TODO , title = "OSX"
} }
|> Seo.website |> Seo.website
@ -82,7 +82,7 @@ view :
-> Shared.Model -> Shared.Model
-> View msg -> View msg
view app shared = view app shared =
{ title = "title" { title = "nganhkhoa osx series"
, body = , body =
[ div [] [ div []
[ text "For years, I learned how the Apple binary format works." [ text "For years, I learned how the Apple binary format works."

View File

@ -112,16 +112,16 @@ head :
head app = head app =
Seo.summary Seo.summary
{ canonicalUrlOverride = Nothing { canonicalUrlOverride = Nothing
, siteName = "elm-pages" , siteName = "nganhkhoa osx series"
, image = , image =
{ url = Pages.Url.external "TODO" { url = Pages.Url.external ""
, alt = "elm-pages logo" , alt = app.data.metadata.title
, dimensions = Nothing , dimensions = Nothing
, mimeType = Nothing , mimeType = Nothing
} }
, description = "TODO" , description = ""
, locale = Nothing , locale = Nothing
, title = "TODO title" -- metadata.title -- TODO , title = app.data.metadata.title
} }
|> Seo.website |> Seo.website
@ -131,7 +131,7 @@ view :
-> Shared.Model -> Shared.Model
-> View (PagesMsg Msg) -> View (PagesMsg Msg)
view app shared = view app shared =
{ title = "title" { title = app.data.metadata.title
, body = , body =
(app.data.body (app.data.body
|> Markdown.Renderer.render TailwindMarkdownRenderer.renderer |> Markdown.Renderer.render TailwindMarkdownRenderer.renderer

View File

@ -3,8 +3,9 @@
"type": "module", "type": "module",
"scripts": { "scripts": {
"postinstall": "elm-tooling install", "postinstall": "elm-tooling install",
"start": "elm-pages dev", "start": "elm-pages dev --port 8080",
"build": "elm-pages build" "build": "elm-pages build",
"publish": "npm run build && scp -r dist/* luibo@nganhkhoa.com:~/website/"
}, },
"devDependencies": { "devDependencies": {
"elm-codegen": "^0.3.0", "elm-codegen": "^0.3.0",