dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-11-30 23:06:10 +03:00
Code Issues Packages Projects Releases Wiki Activity

Hide draft posts from rss feed and sitemap.

Browse Source
This commit is contained in:
Dillon Kearns 2020-01-26 08:31:30 -08:00
parent 920694a024
commit 5522ca068d
2 changed files with 22 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/docs/src/Feed.elm
View File

@ -58,6 +58,10 @@ metadataToRssItem :
metadataToRssItem page = metadataToRssItem page =
case page.frontmatter of case page.frontmatter of
Article article -> Article article ->
if article.draft then
Nothing
else
Just Just
{ title = article.title { title = article.title
, description = article.description , description = article.description

9
examples/docs/src/MySitemap.elm
View File

@ -24,6 +24,15 @@ build config siteMetadata =
, content = , content =
Sitemap.build config Sitemap.build config
(siteMetadata (siteMetadata
|> List.filter
(\page ->
case page.frontmatter of
Article articleData ->
not articleData.draft
_ ->
True
)
|> List.map |> List.map
(\page -> (\page ->
{ path = PagePath.toString page.path, lastMod = Nothing } { path = PagePath.toString page.path, lastMod = Nothing }