diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-28 15:33:04 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-28 15:33:04 +0000 |
commit | db0757d65be3fc91417dea63107c06dfea509606 (patch) | |
tree | bdba266b671f42402daae941bbb9f24bdbfd6f16 /src/Text | |
parent | f273965e16317af4e0756db4fa24a0d8fe296d7b (diff) | |
download | pandoc-db0757d65be3fc91417dea63107c06dfea509606.tar.gz |
Don't put autolinks in typewriter font in ConTeXt, since
ConTeXt has its own way of printing links.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@820 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs index 2cf2b136b..d5f0ba1d0 100644 --- a/src/Text/Pandoc/Writers/ConTeXt.hs +++ b/src/Text/Pandoc/Writers/ConTeXt.hs @@ -217,6 +217,8 @@ inlineToConTeXt (TeX str) = return str inlineToConTeXt (HtmlInline str) = return "" inlineToConTeXt (LineBreak) = return "\\crlf\n" inlineToConTeXt Space = return " " +inlineToConTeXt (Link [Code str] (src, tit)) = -- since ConTeXt has its own + inlineToConTeXt (Link [Str str] (src, tit)) -- way of printing links... inlineToConTeXt (Link text (src, _)) = do next <- get put (next + 1) |