diff options
| author | Henry de Valence <hdevalence@hdevalence.ca> | 2013-12-19 20:46:11 -0500 |
|---|---|---|
| committer | Henry de Valence <hdevalence@hdevalence.ca> | 2013-12-19 20:46:11 -0500 |
| commit | c8fc0a03748ceb4dbea502297ece89eac9d73aff (patch) | |
| tree | 75148f1ab4fe8953295c9888d0c3192316c1c50e | |
| parent | f6d151889c8fff303be8ee8a4f9be67a04de9210 (diff) | |
| download | pandoc-c8fc0a03748ceb4dbea502297ece89eac9d73aff.tar.gz | |
HLint: use /=
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 47b769c48..1deacecb4 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -190,7 +190,7 @@ stringToLaTeX _ [] = return "" stringToLaTeX ctx (x:xs) = do opts <- gets stOptions rest <- stringToLaTeX ctx xs - let ligatures = writerTeXLigatures opts && not (ctx == CodeString) + let ligatures = writerTeXLigatures opts && (ctx /= CodeString) let isUrl = ctx == URLString when (x == '€') $ modify $ \st -> st{ stUsesEuro = True } |