summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins/EWMH.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/Plugins/EWMH.hs')
-rw-r--r--src/Xmobar/Plugins/EWMH.hs10
1 files changed, 0 insertions, 10 deletions
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