Make --ascii work properly with --self-contained.

Closes #568.
jgm · Jul 19, 2012 · 5be6bf0 · 5be6bf0
1 parent 2351f7a
commit 5be6bf0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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']