diff --git a/make-pages/Info.hs b/make-pages/Info.hs index d210e38..3b09f44 100644 --- a/make-pages/Info.hs +++ b/make-pages/Info.hs @@ -22,6 +22,7 @@ data Info = date :: !Day, title :: !(Maybe Text), artist :: !(Maybe Artist), -- nothing = me, obv + warning :: !(Maybe Text), tags :: ![Text], nsfwTags :: ![Text], description :: !(Maybe Text), @@ -65,6 +66,7 @@ instance FromYAML Info where Info <$> m .: "date" <*> m .:? "title" <*> m .:? "artist" + <*> m .:? "warning" <*> m .:? "tags" .!= [] <*> m .:? "nsfwTags" .!= [] <*> m .:? "description"