aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/EPUB.hs
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-09-04 11:21:13 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-09-04 11:21:13 +0300
commitc5572fc07e13b978acae53cd2af066d9b365993e (patch)
tree6bc2be32877f5814b4e09d075cf94f4cf817d63b /src/Text/Pandoc/Writers/EPUB.hs
parentbec2023265ebe1dc5bc3ab410271a7df3c9e65ca (diff)
downloadpandoc-c5572fc07e13b978acae53cd2af066d9b365993e.tar.gz
hlint some writers
Diffstat (limited to 'src/Text/Pandoc/Writers/EPUB.hs')
-rw-r--r--src/Text/Pandoc/Writers/EPUB.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index 4c5e73d81..6099f0223 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -801,7 +801,7 @@ pandocToEPUB version opts doc@(Pandoc meta _) = do
[ unode "a" ! [("href", "text/cover.xhtml")
,("epub:type", "cover")] $
"Cover"] |
- epubCoverImage metadata /= Nothing
+ isJust (epubCoverImage metadata)
] ++
[ unode "li"
[ unode "a" ! [("href", "#toc")