From 5be6bf07d28c1e791b222666db6f863187d3bc18 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 19 Jul 2012 12:45:26 -0700 Subject: [PATCH] Make `--ascii` work properly with `--self-contained`. Closes #568. --- src/pandoc.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/pandoc.hs b/src/pandoc.hs index 2f85906d5aad..71826e0f0394 100644 --- a/src/pandoc.hs +++ b/src/pandoc.hs @@ -1060,7 +1060,7 @@ main = do Left err' -> err 43 $ toString err' Just w | htmlFormat && ascii -> - writerFn outputFile =<< selfcontain (toEntities result) + writerFn outputFile . toEntities =<< selfcontain result | otherwise -> writerFn outputFile =<< selfcontain result where result = w writerOptions doc2 ++ ['\n' | not standalone']