aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Markdown.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-03-04 16:22:08 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2021-03-04 16:22:08 -0800
commit916ce4d51121e0529b938fda71f37e947882abe5 (patch)
tree34925d7068bc9b2c6493f9044a33c33d397d5de0 /src/Text/Pandoc/Readers/Markdown.hs
parente461b7dd45f717f3317216c7d3207a1d24bf1c85 (diff)
downloadpandoc-916ce4d51121e0529b938fda71f37e947882abe5.tar.gz
Revert "Relax `--abbreviations` rules so that a period isn't required."
This reverts commit e461b7dd45f717f3317216c7d3207a1d24bf1c85. Ill-advised change. This doesn't work because we parse strings in chunks.
Diffstat (limited to 'src/Text/Pandoc/Readers/Markdown.hs')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 34edbcc17..b1b99dfe5 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -1725,7 +1725,7 @@ str = do
updateLastStrPos
(do guardEnabled Ext_smart
abbrevs <- getOption readerAbbreviations
- if result `Set.member` abbrevs
+ if not (T.null result) && T.last result == '.' && result `Set.member` abbrevs
then try (do ils <- whitespace
notFollowedBy (() <$ cite <|> () <$ note)
-- ?? lookAhead alphaNum