Textile reader: inline constructors don't trigger if closer...

...is preceded by whitespace.

Closes #10414.

Author: jgm

src/Text/Pandoc/Readers/Textile.hs

@@ -783,7 +783,9 @@ simpleInline border construct = try $ do
   attr <- attributes
   body <- trimInlines . mconcat <$>
           withQuoteContext InSingleQuote
-            (manyTill (notFollowedBy newline >> inline)
+            (manyTill (((B.space <>) <$>
+                         (whitespace *> notFollowedBy newline >> inline))
+                     <|> (notFollowedBy newline >> inline))
              (try border <* notFollowedBy alphaNum))
   return $ construct $
         if attr == nullAttr

test/command/10414.md

@@ -0,0 +1,6 @@
+```
+% pandoc -f textile -t html
+from 30.-100. text, inside - after dash
+^D
+<p>from 30.–100. text, inside - after dash</p>
+```