summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/System
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-05-12 23:14:59 +0100
committerjao <jao@gnu.org>2022-05-12 23:14:59 +0100
commit88017cacad159d826ea8a502e062da079f75e3a2 (patch)
tree81a35f53da0f5630bb59610736e07b96c6a8fd8a /src/Xmobar/System
parentccffb16e0f254db3c07033fafed0d397f005b902 (diff)
downloadxmobar-88017cacad159d826ea8a502e062da079f75e3a2.tar.gz
xmobar-88017cacad159d826ea8a502e062da079f75e3a2.tar.bz2
Remove the now useless -DUTF8 flag
Diffstat (limited to 'src/Xmobar/System')
-rw-r--r--src/Xmobar/System/Localize.hsc6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/Xmobar/System/Localize.hsc b/src/Xmobar/System/Localize.hsc
index eec5e3b..84c4d45 100644
--- a/src/Xmobar/System/Localize.hsc
+++ b/src/Xmobar/System/Localize.hsc
@@ -25,9 +25,7 @@ import qualified System.Locale as L
import qualified Data.Time.Format as L
#endif
-#ifdef UTF8
import Codec.Binary.UTF8.String
-#endif
-- get localized strings
type NlItem = CInt
@@ -48,12 +46,8 @@ foreign import ccall unsafe "langinfo.h nl_langinfo"
getLangInfo :: NlItem -> IO String
getLangInfo item = do
itemStr <- nl_langinfo item
-#ifdef UTF8
str <- peekCString itemStr
return $ if isUTF8Encoded str then decodeString str else str
-#else
- peekCString itemStr
-#endif
#include <locale.h>
foreign import ccall unsafe "locale.h setlocale"