diff options
author | John MacFarlane <jgm@berkeley.edu> | 2020-11-16 16:36:16 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2020-11-16 16:36:16 -0800 |
commit | 5271c6b3fbdc72d6a3e0405718f7c98cdf47eda0 (patch) | |
tree | 9744b84668ee382d25e28b4412f1f77831451ecd /src/Text/Pandoc | |
parent | 734b4c26a990a334b2bbe352ba34257ebb2a6fcd (diff) | |
download | pandoc-5271c6b3fbdc72d6a3e0405718f7c98cdf47eda0.tar.gz |
Improve fix to siunitx numbers with minus.
- use real minus sign
- use tests contributed by Igor Pashev.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX/SIunitx.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX/SIunitx.hs b/src/Text/Pandoc/Readers/LaTeX/SIunitx.hs index d16dec580..db9c276e7 100644 --- a/src/Text/Pandoc/Readers/LaTeX/SIunitx.hs +++ b/src/Text/Pandoc/Readers/LaTeX/SIunitx.hs @@ -71,7 +71,7 @@ parseNumPart = parseSpace where parseDecimalNum = do - pref <- option mempty $ (mempty <$ char '+') <|> ("-" <$ char '-') + pref <- option mempty $ (mempty <$ char '+') <|> ("\x2212" <$ char '-') basenum <- (pref <>) . T.pack <$> many1 (satisfy (\c -> isDigit c || c == '.')) uncertainty <- option mempty $ T.pack <$> parseParens |