aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/RST.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Readers/RST.hs')
-rw-r--r--src/Text/Pandoc/Readers/RST.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index a3b9bfca7..9a25fe84a 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -508,6 +508,7 @@ imageKey = try (do
anonymousKey = try (do
choice [string ".. __:", string "__"]
skipSpaces
+ option ' ' newline
src <- manyTill anyChar newline
state <- getState
return (Key [Str "_"] (Src (removeLeadingTrailingSpace src) "")))
@@ -516,6 +517,7 @@ regularKeyQuoted = try (do
string ".. _`"
ref <- manyTill inline (string "`:")
skipSpaces
+ option ' ' newline
src <- manyTill anyChar newline
return (Key (normalizeSpaces ref)
(Src (removeLeadingTrailingSpace src) "")))
@@ -524,6 +526,7 @@ regularKey = try (do
string ".. _"
ref <- manyTill inline (char ':')
skipSpaces
+ option ' ' newline
src <- manyTill anyChar newline
return (Key (normalizeSpaces ref)
(Src (removeLeadingTrailingSpace src) "")))