aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-15 03:20:14 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-15 03:20:14 +0000
commitda645eb24b7a7f23949304e3ea6fa274c45d06c8 (patch)
tree9cb261ac7723b39f6c40b2a45966717b0fc1a4b9 /src
parent229b3107b6aa44e9ed6dbb9474a4e90641a45cfb (diff)
downloadpandoc-da645eb24b7a7f23949304e3ea6fa274c45d06c8.tar.gz
Main.hs: If writer is "context", automatically select
smart quotes option. web/demos: Removed redundant -S in context writer demo. git-svn-id: https://pandoc.googlecode.com/svn/trunk@723 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src')
-rw-r--r--src/Main.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 3272463dc..a60ca4c33 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -447,7 +447,8 @@ main = do
defaultParserState { stateParseRaw = parseRaw,
stateTabStop = tabStop,
stateStandalone = standalone && (not strict),
- stateSmart = smart || writerName' == "latex",
+ stateSmart = smart || writerName' `elem`
+ ["latex", "context"],
stateColumns = columns,
stateStrict = strict }
let csslink = if (css == "")