diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2009-05-04 00:05:58 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2009-05-04 00:05:58 +0000 |
commit | 236896bd10ae8206cb9e187d48dcee15bd797082 (patch) | |
tree | 76385694b798543eb8a1e728af8c64a3d81b2ab4 /src/Text/Pandoc/Readers/RST.hs | |
parent | 2f737a97e42daa2e84050aac70fb4030a826fa75 (diff) | |
download | pandoc-236896bd10ae8206cb9e187d48dcee15bd797082.tar.gz |
RST reader: Allow explicit links with spaces in URL: `link <to this>`_
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1576 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Readers/RST.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index 255054c10..ae025f4ea 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -659,7 +659,7 @@ explicitLink = try $ do notFollowedBy (char '`') -- `` marks start of inline code label' <- manyTill (notFollowedBy (char '`') >> inline) (try (spaces >> char '<')) - src <- manyTill (noneOf ">\n ") (char '>') + src <- manyTill (noneOf ">\n") (char '>') skipSpaces string "`_" return $ Link (normalizeSpaces label') (removeLeadingTrailingSpace src, "") |