website/app/Site.elm

22 lines
474 B
Elm
Raw Normal View History

2023-10-24 05:23:25 +07:00
module Site exposing (config)
import BackendTask exposing (BackendTask)
import FatalError exposing (FatalError)
import Head
import SiteConfig exposing (SiteConfig)
config : SiteConfig
config =
{ canonicalUrl = "https://elm-pages.com"
, head = head
}
head : BackendTask FatalError (List Head.Tag)
head =
[ Head.metaName "viewport" (Head.raw "width=device-width,initial-scale=1")
, Head.sitemapLink "/sitemap.xml"
]
|> BackendTask.succeed