Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Textile writer: Don't HTML-escape between @'s.

Browse source
This commit is contained in:
John MacFarlane 2011-01-23 09:12:50 -08:00
parent 628a1ef815
commit 38013de857
3 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Readers/Textile.hs
View file

@ -18,7 +18,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
{- |
Module : Text.Pandoc.Readers.Textile
Copyright : Copyright (C) 2010 Paul Rivier
Copyright : Copyright (C) 2010-2011 Paul Rivier and John MacFarlane
License : GNU GPL, version 2 or above
Maintainer : Paul Rivier <paul*rivier#demotera*com>

2
src/Text/Pandoc/Writers/Textile.hs
View file

@ -378,7 +378,7 @@ inlineToTextile _ Ellipses = return "..."
inlineToTextile _ (Code str) =
return $ if '@' `elem` str
then "<tt>" ++ escapeStringForXML str ++ "</tt>"
else "@" ++ escapeStringForXML str ++ "@"
else "@" ++ str ++ "@"
inlineToTextile _ (Str str) = return $ escapeStringForTextile str

4
tests/writer.textile
View file

@ -450,7 +450,7 @@ So is *_this_* word.
So is *_this_* word.
This is code: @&gt;@, @$@, @\@, @\$@, @&lt;html&gt;@.
This is code: @>@, @$@, @\@, @\$@, @<html>@.
-This is _strikeout_.-
@ -630,7 +630,7 @@ An e-mail address: "nobody@nowhere.net":mailto:nobody@nowhere.net
bq. Blockquoted: "http://example.com/":http://example.com/
Auto-links should not occur here: @&lt;http://example.com/&gt;@
Auto-links should not occur here: @<http://example.com/>@
bc. or here: &lt;http://example.com/&gt;