Talk:Internationalization of Haskell programs using gettext

I think the gettext function

__

should add decodeString from Codec.Binary.UTF8.String for many locales to be displayed correctly, such as zh_CN.

import Codec.Binary.UTF8.String (decodeString)
 
__ :: String -> String
__ = decodeString . unsafePerformIO . getText

See my post on "stackoverflow".