@@ -584,11 +584,14 @@ pandocToEPUB version opts doc = do
584584 _ -> (Pandoc nullMeta bs, "bodymatter")
585585 frontMatterTypes = ["prologue", "abstract", "acknowledgments",
586586 "copyright-page", "dedication",
587− "foreword", "halftitle",
588− "introduction", "preface",
587+ "credits", "keywords", "imprint",
588+ "contributors", "other-credits",
589+ "errata", "revision-history",
590+ "titlepage", "halftitlepage", "seriespage",
591+ "foreword", "preface",
589592 "seriespage", "titlepage"]
590− backMatterTypes = ["afterword", "appendix", "colophon",
591− "conclusion", "epigraph"]
593+ backMatterTypes = ["appendix", "colophon", "bibliography",
594+ "index"]
592595
593596 chapterEntries <- zipWithM chapToEntry [1..] chapters
594597