diff options
| author | jao <jao@gnu.org> | 2022-05-12 23:14:59 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-05-12 23:14:59 +0100 |
| commit | 88017cacad159d826ea8a502e062da079f75e3a2 (patch) | |
| tree | 81a35f53da0f5630bb59610736e07b96c6a8fd8a /src/Xmobar/Plugins | |
| parent | ccffb16e0f254db3c07033fafed0d397f005b902 (diff) | |
| download | xmobar-88017cacad159d826ea8a502e062da079f75e3a2.tar.gz xmobar-88017cacad159d826ea8a502e062da079f75e3a2.tar.bz2 | |
Remove the now useless -DUTF8 flag
Diffstat (limited to 'src/Xmobar/Plugins')
| -rw-r--r-- | src/Xmobar/Plugins/EWMH.hs | 10 | ||||
| -rw-r--r-- | src/Xmobar/Plugins/XMonadLog.hs | 11 |
2 files changed, 0 insertions, 21 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 diff --git a/src/Xmobar/Plugins/XMonadLog.hs b/src/Xmobar/Plugins/XMonadLog.hs index d887aad..e1459e1 100644 --- a/src/Xmobar/Plugins/XMonadLog.hs +++ b/src/Xmobar/Plugins/XMonadLog.hs @@ -23,12 +23,7 @@ import Graphics.X11.Xlib.Extras import Xmobar.Run.Exec import Xmobar.Run.Actions (stripActions) -#ifdef UTF8 -#undef UTF8 import Codec.Binary.UTF8.String as UTF8 -#define UTF8 -#endif - import Foreign.C (CChar) import Data.List (intercalate) import Xmobar.X11.Events (nextEvent') @@ -86,10 +81,4 @@ instance Exec XMonadLog where return () decodeCChar :: [CChar] -> String -#ifdef UTF8 -#undef UTF8 decodeCChar = UTF8.decode . map fromIntegral -#define UTF8 -#else -decodeCChar = map (toEnum . fromIntegral) -#endif |