Add missing case branch.

This commit is contained in:
Dillon Kearns 2019-08-10 16:44:43 -07:00
parent a9ebd1e7e5
commit f19f53164f

View File

@ -21,6 +21,9 @@ view posts =
Metadata.Article meta ->
Just ( path, meta )
Metadata.Doc meta ->
Nothing
)
|> List.map postSummary
)