From 88017cacad159d826ea8a502e062da079f75e3a2 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 12 May 2022 23:14:59 +0100 Subject: Remove the now useless -DUTF8 flag --- src/Xmobar/System/Localize.hsc | 6 ------ 1 file changed, 6 deletions(-) (limited to 'src/Xmobar/System') 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 foreign import ccall unsafe "locale.h setlocale" -- cgit v1.2.3