From 24f3710e0911fa8ebe6070ef83c6206e54a46f1a Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Thu, 4 Jan 2007 17:51:46 +0000 Subject: 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 --- src/Text/Pandoc/Entities.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Entities.hs') 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) -- cgit v1.2.3