summaryrefslogtreecommitdiff
path: root/GitRepo.hs
diff options
context:
space:
mode:
Diffstat (limited to 'GitRepo.hs')
-rw-r--r--GitRepo.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/GitRepo.hs b/GitRepo.hs
index 07f243b66..533038fc8 100644
--- a/GitRepo.hs
+++ b/GitRepo.hs
@@ -438,7 +438,7 @@ encodeGitFile s = foldl (++) "\"" (map echar s) ++ "\""
e_num c = showoctal $ ord c
-- unicode character is decomposed to
-- Word8s and each is shown in octal
- e_utf c = foldl (++) "" $ map showoctal $
+ e_utf c = concat $ map showoctal $
(encode [c] :: [Word8])