aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2023-04-20 13:33:02 -0700
committerJohn MacFarlane <[email protected]>2023-04-20 13:33:02 -0700
commit16f28ef5e945f3be14e05afb7d91f8adca18e49a (patch)
tree897a1e25b7f68de5cbcde56516ff515970c65e0c
parent3f0dd816cfaa51e6850bf992b55938aad5132ba3 (diff)
Remove redundant line in pattern match.
-rw-r--r--src/Text/Pandoc/Writers/EPUB.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index 7faad746e..0bdc4c2bd 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -251,7 +251,6 @@ addMetadataFromXML e@(Element (QName name _ (Just "dc")) attrs _ _) md
| name == "description" = md { epubDescription = Just $ strContent e }
| name == "type" = md { epubType = Just $ strContent e }
| name == "format" = md { epubFormat = Just $ strContent e }
- | name == "type" = md { epubType = Just $ strContent e }
| name == "publisher" = md { epubPublisher = Just $ strContent e }
| name == "source" = md { epubSource = Just $ strContent e }
| name == "relation" = md { epubRelation = Just $ strContent e }