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/Plugins/EWMH.hs | 10 ---------- 1 file changed, 10 deletions(-) (limited to 'src/Xmobar/Plugins/EWMH.hs') diff --git a/src/Xmobar/Plugins/EWMH.hs b/src/Xmobar/Plugins/EWMH.hs index 6440940..94fd7d7 100644 --- a/src/Xmobar/Plugins/EWMH.hs +++ b/src/Xmobar/Plugins/EWMH.hs @@ -23,11 +23,7 @@ import Control.Monad.Reader import Graphics.X11 hiding (Modifier, Color) import Graphics.X11.Xlib.Extras import Xmobar.Run.Exec -#ifdef UTF8 -#undef UTF8 import Codec.Binary.UTF8.String as UTF8 -#define UTF8 -#endif import Foreign.C (CChar, CLong) import Xmobar.X11.Events (nextEvent') @@ -256,10 +252,4 @@ updateDesktop w = do _ -> return () decodeCChar :: [CChar] -> String -#ifdef UTF8 -#undef UTF8 decodeCChar = UTF8.decode . map fromIntegral -#define UTF8 -#else -decodeCChar = map (toEnum . fromIntegral) -#endif -- cgit v1.2.3