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/Pandoc/Writers | |
| parent | f273965e16317af4e0756db4fa24a0d8fe296d7b (diff) | |
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/Pandoc/Writers')
| -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) |