SelfContained: data-background-image instead of data-background.

Really closes #3979.
This commit is contained in:
John MacFarlane
2017-10-20 23:16:53 -07:00
parent dc92c34827
commit 5164ecd0ec
+1 -1
View File
@@ -80,7 +80,7 @@ convertTags (t@(TagOpen tagname as):ts)
rest <- convertTags ts
return $ TagOpen tagname as' : rest
where processAttribute (x,y) =
if x `elem` ["src", "data-src", "href", "poster", "data-background"]
if x `elem` ["src", "data-src", "href", "poster", "data-background-image"]
then do
enc <- getDataURI (fromAttrib "type" t) y
return (x, enc)