Fix template problem for epub.
commit45b8520af877014ecbf56566ec1b8b9d42027013
authorJohn MacFarlane <jgm@berkeley.edu>
dateThu 28 Jul 2011, 18:53 (15 years ago)
parent57821e1
src/Text/Pandoc/Templates.hs+1
@@ -83,6 +83,7 @@ getDefaultTemplate :: (Maybe FilePath) -- ^ User data directory to search first
8383 -> IO (Either E.IOException String)
8484getDefaultTemplate _ "native" = return $ Right ""
8585getDefaultTemplate user "odt" = getDefaultTemplate user "opendocument"
86+getDefaultTemplate user "epub" = getDefaultTemplate user "html"
8687getDefaultTemplate user writer = do
8788 let format = takeWhile (/='+') writer -- strip off "+lhs" if present
8889 let fname = "templates" </> "default" <.> format