From ec24f9761c71961821c180d3f6eeb3b5c08aaebf Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Thu, 24 Apr 2014 12:56:25 +0200 Subject: RST reader: Remove duplicate 'http' in PEP links The generated link to PEPs had a duplicate 'http://' in its URL. --- src/Text/Pandoc/Readers/RST.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index a574f343a..7785861cc 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -1005,7 +1005,7 @@ renderRole contents fmt role attr = case role of where rfcUrl = "http://www.faqs.org/rfcs/rfc" ++ rfcNo ++ ".html" pepLink pepNo = B.link pepUrl ("PEP " ++ pepNo) $ B.str ("PEP " ++ pepNo) where padNo = replicate (4 - length pepNo) '0' ++ pepNo - pepUrl = "http://http://www.python.org/dev/peps/pep-" ++ padNo ++ "/" + pepUrl = "http://www.python.org/dev/peps/pep-" ++ padNo ++ "/" roleNameEndingIn :: RSTParser Char -> RSTParser String roleNameEndingIn end = many1Till (letter <|> char '-') end -- cgit v1.2.3