remove background stuff that didnt work
This commit is contained in:
parent
e719d41110
commit
488a4cdd08
2 changed files with 2 additions and 5 deletions
|
@ -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" .!= []
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue