diff options
Diffstat (limited to 'src/main.hs')
| -rw-r--r-- | src/main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/main.hs b/src/main.hs index 4b78f49..669aedd 100644 --- a/src/main.hs +++ b/src/main.hs @@ -89,7 +89,7 @@ getCurrentDesktop d = getDesktopNames :: X11.Display -> IO (Maybe [Text]) getDesktopNames d = do - (fmap (init . Text.split (=='\NUL')) <$>) $ + (fmap (Text.split (=='\NUL')) <$>) $ X11.getWindowPropertyText d atom_NET_DESKTOP_NAMES w <|> X11.getWindowPropertyText d atom_WIN_WORKSPACE_NAMES w where w = X11.defaultRootWindow d |