Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

updated pandoc

  • Loading branch information...
commit df84b371d4cb5dd639a8fef3d3702af195d37d0a 1 parent 68610eb
@Soares authored
Showing with 2 additions and 2 deletions.
  1. +1 −1  src/Book.hs
  2. +1 −1  src/Target/Pandoc.hs
View
2  src/Book.hs
@@ -60,7 +60,7 @@ load opts = do
-- Filter the targets included by '-t' options
let inTargets path = case optTargets opts of
[] -> True
- xs -> takeFileName path `elem` xs
+ xs -> (dropExtension . takeFileName) path `elem` xs
let included path = not (Config.isSpecial path) && inTargets path
paths <- filter included <$> liftIO (ls targetDir)
targets <- mapM (Target.load conf') paths
View
2  src/Target/Pandoc.hs
@@ -42,7 +42,7 @@ write format conf dest doc = case lookup format writers of
Nothing | format == "pdf" ->
PDF.outputLaTeX conf dest $ writeLaTeX opts doc'
Nothing | format == "epub" ->
- writeEPUB (Config.style conf) epubOpts doc'
+ writeEPUB (Config.style conf) [] epubOpts doc'
>>= B.writeFile (encodeString dest)
Nothing | format == "odt" ->
writeODT (Config.resources conf) opts doc'
Please sign in to comment.
Something went wrong with that request. Please try again.