Textile reader: don't let spans begin right after a symbol.

Closes #9878.
This commit is contained in:
John MacFarlane
2024-06-18 13:24:15 -07:00
parent 1e8799ca60
commit 34aeb289c9
2 changed files with 12 additions and 3 deletions
+6 -3
View File
@@ -685,9 +685,12 @@ escapedTag = B.str . T.pack <$>
-- | Any special symbol defined in wordBoundaries
symbol :: PandocMonad m => TextileParser m Inlines
symbol = B.str . T.singleton <$> (notFollowedBy newline *>
notFollowedBy rawHtmlBlock *>
oneOf wordBoundaries)
symbol = do
c <- notFollowedBy newline *>
notFollowedBy rawHtmlBlock *>
oneOf wordBoundaries
updateLastStrPos
pure $ B.str . T.singleton $ c
-- | Inline code
code :: PandocMonad m => TextileParser m Inlines
+6
View File
@@ -0,0 +1,6 @@
```
% pandoc -f textile -t native
15% 50%
^D
[ Para [ Str "15%" , Space , Str "50%" ] ]
```