From edc0913ed921e46c99d9080a14b8bd6b92c3d734 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 9 Jul 2009 19:12:27 +0000
Subject: [PATCH] handle utf8 properly in error messages (issue #5)

---
 Utils.hs                                                       | 3 ++-
 ...-message.test.notimplemented => unicode-error-message.test} | 1 +
 2 files changed, 3 insertions(+), 1 deletion(-)
 rename tests/{unicode-error-message.test.notimplemented => unicode-error-message.test} (99%)

diff --git a/Utils.hs b/Utils.hs
index b36c90642..dcd5e228c 100644
--- a/Utils.hs
+++ b/Utils.hs
@@ -11,7 +11,8 @@ import Control.Monad.Error
 import Ledger
 import Options (Opt,ledgerFilePathFromOpts,optsToFilterSpec)
 import System.Directory (doesFileExist)
-import System.IO
+import System.IO (stderr)
+import System.IO.UTF8 (hPutStrLn)
 import System.Exit
 import System.Cmd (system)
 import System.Info (os)
diff --git a/tests/unicode-error-message.test.notimplemented b/tests/unicode-error-message.test
similarity index 99%
rename from tests/unicode-error-message.test.notimplemented
rename to tests/unicode-error-message.test
index 1dc4ab76e..48a4fdad8 100644
--- a/tests/unicode-error-message.test.notimplemented
+++ b/tests/unicode-error-message.test
@@ -11,3 +11,4 @@ could not balance this transaction, amounts do not add up to zero:
     дебит              1
     кредит            -2
 
+