diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-03-04 16:22:08 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-03-04 16:22:08 -0800 |
| commit | 916ce4d51121e0529b938fda71f37e947882abe5 (patch) | |
| tree | 34925d7068bc9b2c6493f9044a33c33d397d5de0 | |
| parent | e461b7dd45f717f3317216c7d3207a1d24bf1c85 (diff) | |
| download | pandoc-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.
| -rw-r--r-- | MANUAL.txt | 6 | ||||
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/MANUAL.txt b/MANUAL.txt index 667a784e0..52b82a3d0 100644 --- a/MANUAL.txt +++ b/MANUAL.txt @@ -691,9 +691,9 @@ header when requesting a document from a URL: system default, use `pandoc --print-default-data-file=abbreviations`. The only use pandoc makes of this list is in the Markdown reader. - Strings found in this list will be followed by a nonbreaking - space, and the period will not produce sentence-ending space - in formats like LaTeX. The strings may not contain spaces. + Strings ending in a period that are found in this list will + be followed by a nonbreaking space, so that the period will + not produce sentence-ending space in formats like LaTeX. [`pandocfilters`]: https://github.com/jgm/pandocfilters [PHP]: https://github.com/vinai/pandocfilters-php 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 |