summaryrefslogtreecommitdiff
path: root/src/pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-07-19 12:45:26 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-07-19 12:45:26 -0700
commit5be6bf07d28c1e791b222666db6f863187d3bc18 (patch)
tree7b5982370a5e50cd16589eee75ebee9dcafd0ecc /src/pandoc.hs
parent2351f7a112f7ebc612200ef3684cc3327dec8296 (diff)
Make `--ascii` work properly with `--self-contained`.
Closes #568.
Diffstat (limited to 'src/pandoc.hs')
-rw-r--r--src/pandoc.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs
index 2f85906d5..71826e0f0 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']