summaryrefslogtreecommitdiff
path: root/git-annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-03-08 18:05:20 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-03-08 18:05:20 -0400
commit26544de9463291b8185fdd1a7c1b33710ef7db3c (patch)
treeab7d626afd1908f6f089e154f87e2585dff703d6 /git-annex.hs
parentb85c91743c73597f41cae73b042ffa86be929ed3 (diff)
put in utf8 forcing workaround
Haskell's IO layer crashes on characters > 255 when in a non-unicode (latin1) locale. Until Haskell gets better behavior, put in an admittedly ugly workaround for that: git-annex forces utf8 output mode no matter what locale is selected. So if you use a non-utf8 locale, your filenames with characters > 127 will not be displayed as you'd expect. But at least it won't crash.
Diffstat (limited to 'git-annex.hs')
-rw-r--r--git-annex.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/git-annex.hs b/git-annex.hs
index 878d8bdbb..9d6012f2c 100644
--- a/git-annex.hs
+++ b/git-annex.hs
@@ -8,6 +8,7 @@
import System.Environment
import GitAnnex
+
main :: IO ()
main = do
args <- getArgs