From 403f5f47288f5c65d5354fded1a2164185b1178c Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Fri, 12 Oct 2007 03:03:29 +0000 Subject: Undid last change: instead of blocking the internal links in the writers, it makes more sense to block them in the HTML reader. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1048 788f1e2b-df1e-0410-8736-df70ead52e1b --- debian/changelog | 2 -- src/Text/Pandoc/Writers/Man.hs | 1 - 2 files changed, 3 deletions(-) diff --git a/debian/changelog b/debian/changelog index a37793d60..1a73a93c5 100644 --- a/debian/changelog +++ b/debian/changelog @@ -68,8 +68,6 @@ pandoc (0.45) unstable; urgency=low + If label for a link reference contains a colon, surround it by ` signs so it won't be interpreted as the end of the link label. - * Man writer: Don't print link source for internal links (#...). - * Main.hs (tabFilter): Treat '\r' at end of line as newline (in addition to "\r\n" and '\n'). diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs index 27c6d9a89..8e14c2bf0 100644 --- a/src/Text/Pandoc/Writers/Man.hs +++ b/src/Text/Pandoc/Writers/Man.hs @@ -272,7 +272,6 @@ inlineToMan opts (TeX str) = return $ text $ escapeCode str inlineToMan opts (HtmlInline str) = return $ text $ escapeCode str inlineToMan opts (LineBreak) = return $ text "\n.PD 0\n.P\n.PD\n" inlineToMan opts Space = return $ char ' ' -inlineToMan opts (Link txt (('#':_), _)) = inlineListToMan opts txt inlineToMan opts (Link txt (src, _)) = do linktext <- inlineListToMan opts txt let srcSuffix = if isPrefixOf "mailto:" src then drop 7 src else src -- cgit v1.2.3