diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-05-07 10:18:54 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-05-07 10:18:54 +0200 |
| commit | e85348ba27b3ed209a8498d25b6ecbf627e0c4c4 (patch) | |
| tree | 8501d97b2410df442e1c89b39deb3cbc9e341a53 /XMonad/Hooks/EwmhDesktops.hs | |
| parent | 5ec0641c2201f9feb48e5c5992cf1063633f80dc (diff) | |
| download | XMonadContrib-e85348ba27b3ed209a8498d25b6ecbf627e0c4c4.tar.gz XMonadContrib-e85348ba27b3ed209a8498d25b6ecbf627e0c4c4.tar.xz XMonadContrib-e85348ba27b3ed209a8498d25b6ecbf627e0c4c4.zip | |
Use the named constant 'none' rather than 0
darcs-hash:20080507081854-a5988-e08995616a8cc9f3cc48b2ff9f25eb257240c19f.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 98ae410..562ce7b 100644 --- a/XMonad/Hooks/EwmhDesktops.hs +++ b/XMonad/Hooks/EwmhDesktops.hs @@ -200,7 +200,7 @@ setSupported = withDisplay $ \dpy -> do setActiveWindow :: X () setActiveWindow = withWindowSet $ \s -> withDisplay $ \dpy -> do - let w = fromMaybe 0 (W.peek s) + let w = fromMaybe none (W.peek s) r <- asks theRoot a <- getAtom "_NET_ACTIVE_WINDOW" c <- getAtom "WINDOW" |