summaryrefslogtreecommitdiff
path: root/src/pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-07-25 11:43:56 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-07-25 11:43:56 -0700
commitef0619cc6d576061ba7e93b7ecf16f72021c6f68 (patch)
tree604648fe9665e339c3a7ddefc103fe1e94112c64 /src/pandoc.hs
parent8b380a464e7cd27f992e26d861d5e451e90e9600 (diff)
Moved ParseRaw from ParserState to ReaderOptions.
Diffstat (limited to 'src/pandoc.hs')
-rw-r--r--src/pandoc.hs13
1 files changed, 7 insertions, 6 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs
index febf46dd0..665863572 100644
--- a/src/pandoc.hs
+++ b/src/pandoc.hs
@@ -936,18 +936,19 @@ main = do
then "."
else takeDirectory (head sources)
- let startParserState = def{ stateParseRaw = parseRaw,
- stateTabStop = tabStop,
+ let startParserState = def{ stateTabStop = tabStop,
stateLiterateHaskell = "+lhs" `isSuffixOf` readerName' ||
lhsExtension sources,
stateStandalone = standalone',
stateCitations = map CSL.refId refs,
stateOldDashes = oldDashes,
stateColumns = columns,
- stateOptions = def{ readerStrict = strict
- , readerSmart = smart ||
- (texLigatures &&
- (laTeXOutput || writerName' == "context")) },
+ stateOptions = def{
+ readerStrict = strict
+ , readerSmart = smart || (texLigatures &&
+ (laTeXOutput || writerName' == "context"))
+ , readerParseRaw = parseRaw
+ },
stateIndentedCodeClasses = codeBlockClasses,
stateApplyMacros = not laTeXOutput
}