diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-01-04 17:51:46 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-01-04 17:51:46 +0000 |
commit | 24f3710e0911fa8ebe6070ef83c6206e54a46f1a (patch) | |
tree | bc127c1fff1460c197448c11e8e472344b3663ca /src/Text/Pandoc/Entities.hs | |
parent | 9e199dc1a3ef55dee94db92d620c4250ba8c8e53 (diff) | |
download | pandoc-24f3710e0911fa8ebe6070ef83c6206e54a46f1a.tar.gz |
Fixed bug in encodeEntities (characters less than 128, not 127,
should be encoded).
git-svn-id: https://pandoc.googlecode.com/svn/trunk@416 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Entities.hs')
-rw-r--r-- | src/Text/Pandoc/Entities.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Entities.hs b/src/Text/Pandoc/Entities.hs index c5dfbf134..fd3cf9e57 100644 --- a/src/Text/Pandoc/Entities.hs +++ b/src/Text/Pandoc/Entities.hs @@ -58,7 +58,7 @@ decodeEntities str = -- possible. encodeEntities :: String -> String encodeEntities [] = [] -encodeEntities (c:cs) = if ord c < 127 +encodeEntities (c:cs) = if ord c < 128 then c:(encodeEntities cs) else (charToEntity c) ++ (encodeEntities cs) |