diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/App/Opt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/App/Opt.hs b/src/Text/Pandoc/App/Opt.hs index 7e15b2cb0..00b4b5523 100644 --- a/src/Text/Pandoc/App/Opt.hs +++ b/src/Text/Pandoc/App/Opt.hs @@ -332,7 +332,7 @@ doOpt (k',v) = do parseYAML v >>= \x -> return (\o -> o{ optSetextHeaders = not x }) "markdown-headings" -> parseYAML v >>= \x -> return (\o -> - case (T.toLower x) of + case T.toLower x of "atx" -> o{ optSetextHeaders = False } "setext" -> o{ optSetextHeaders = True } _ -> o) |