git.iko.soy/typeable/pandoc
on master help sign in
Revert "Relax `--abbreviations` rules so that a period isn't required."
e89e5ceJohn MacFarlane
MANUAL.txt+3−3
compare with master
unifiedsplit
@@ -691,9 +691,9 @@ header when requesting a document from a URL:
691 system default, use
691 system default, use
692 `pandoc --print-default-data-file=abbreviations`. The only
692 `pandoc --print-default-data-file=abbreviations`. The only
693 use pandoc makes of this list is in the Markdown reader.
693 use pandoc makes of this list is in the Markdown reader.
694− Strings found in this list will be followed by a nonbreaking
694+ Strings ending in a period that are found in this list will
695+ be followed by a nonbreaking space, so that the period will
695− space, and the period will not produce sentence-ending space
696+ not produce sentence-ending space in formats like LaTeX.
696− in formats like LaTeX. The strings may not contain spaces.
697
697
698[`pandocfilters`]: https://github.com/jgm/pandocfilters
698[`pandocfilters`]: https://github.com/jgm/pandocfilters
699[PHP]: https://github.com/vinai/pandocfilters-php
699[PHP]: https://github.com/vinai/pandocfilters-php
src/Text/Pandoc/Readers/Markdown.hs+1−1
@@ -1725,7 +1725,7 @@ str = do
1725 updateLastStrPos
1725 updateLastStrPos
1726 (do guardEnabled Ext_smart
1726 (do guardEnabled Ext_smart
1727 abbrevs <- getOption readerAbbreviations
1727 abbrevs <- getOption readerAbbreviations
1728− if result `Set.member` abbrevs
1728+ if not (T.null result) && T.last result == '.' && result `Set.member` abbrevs
1729 then try (do ils <- whitespace
1729 then try (do ils <- whitespace
1730 notFollowedBy (() <$ cite <|> () <$ note)
1730 notFollowedBy (() <$ cite <|> () <$ note)
1731 -- ?? lookAhead alphaNum
1731 -- ?? lookAhead alphaNum