diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-12-22 12:06:41 +0100 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-12-22 12:06:41 +0100 |
| commit | aef390f3dde7d126a9946d8f9a0120d8aa1a71a5 (patch) | |
| tree | ae48dbc6a911500ae27f8d0e94442dcfbeecf814 /XMonad/Hooks/EwmhDesktops.hs | |
| parent | b0e2722a260657be52da99fd88d643b545a5171b (diff) | |
| download | XMonadContrib-aef390f3dde7d126a9946d8f9a0120d8aa1a71a5.tar.gz XMonadContrib-aef390f3dde7d126a9946d8f9a0120d8aa1a71a5.tar.xz XMonadContrib-aef390f3dde7d126a9946d8f9a0120d8aa1a71a5.zip | |
Wibble
darcs-hash:20071222110641-a5988-8175f8b42ca8b1152dd10db1c6733156b7bc2c9e.gz
Diffstat (limited to 'XMonad/Hooks/EwmhDesktops.hs')
| -rw-r--r-- | XMonad/Hooks/EwmhDesktops.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs index b9dff0c..c0856d7 100644 --- a/XMonad/Hooks/EwmhDesktops.hs +++ b/XMonad/Hooks/EwmhDesktops.hs @@ -99,7 +99,7 @@ setDesktopNames names = withDisplay $ \dpy -> do a <- getAtom "_NET_DESKTOP_NAMES" c <- getAtom "UTF8_STRING" let names' = map (fromIntegral.fromEnum) $ - concatMap ((++['\0'])) names + concatMap (++['\0']) names io $ changeProperty8 dpy r a c propModeReplace names' setClientList :: [Window] -> X () |