diff --git a/make-pages/Info.hs b/make-pages/Info.hs
index 2d82f8e..6eea489 100644
--- a/make-pages/Info.hs
+++ b/make-pages/Info.hs
@@ -34,7 +34,6 @@ data Info =
nsfwTags :: ![Text],
description :: !(Maybe Text),
images :: ![Image],
- background :: !(Maybe Text),
thumb' :: !(Maybe FilePath),
links :: ![Link]
}
@@ -101,7 +100,6 @@ instance FromYAML Info where
<*> m .:? "nsfw-tags" .!= []
<*> m .:? "description"
<*> (m .: "images" >>= imageList)
- <*> m .:? "background"
<*> m .:? "thumb"
<*> m .:? "links" .!= []
diff --git a/make-pages/SinglePage.hs b/make-pages/SinglePage.hs
index cc30ac2..368ff30 100644
--- a/make-pages/SinglePage.hs
+++ b/make-pages/SinglePage.hs
@@ -28,7 +28,7 @@ make nsfw = toLazyText . make' nsfw
make' :: Bool -> Info -> Builder
make' nsfw (Info {date, title, artist, tags, nsfwTags,
- description, images, background, links}) = [b|@0
+ description, images, links}) = [b|@0
@@ -48,7 +48,7 @@ make' nsfw (Info {date, title, artist, tags, nsfwTags,
-
+
$warning'
@@ -84,7 +84,6 @@ make' nsfw (Info {date, title, artist, tags, nsfwTags,
tagsList = makeTags nsfw tags nsfwTags
linksList = extLinks nsfw links
- dataBg = ifJust background \bg -> [b| data-bg="$*bg"|]
warning' = ifJust (#warning image0) \w -> [b|@4
cw: $*w