diff options
| -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 |