diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-06-30 04:10:26 +0200 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-06-30 04:10:26 +0200 |
commit | 3b6c7895fb2aeff36ca8b652a4f89ec6e41d8c88 (patch) | |
tree | 35ff168ab5cfd8fc91a095e9bbf749079ec5a919 /Operations.hs | |
parent | dc49874c83c20b17b5b6ea5ab63e638402ba8f1a (diff) | |
download | xmonad-3b6c7895fb2aeff36ca8b652a4f89ec6e41d8c88.tar.gz xmonad-3b6c7895fb2aeff36ca8b652a4f89ec6e41d8c88.tar.xz xmonad-3b6c7895fb2aeff36ca8b652a4f89ec6e41d8c88.zip |
UPGRADE X11-Extras! Manage iconified windows
darcs-hash:20070630021026-a5988-808741074e4132930b6036826d758b362c498dfc.gz
Diffstat (limited to '')
-rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index ee5a5bc..5a1d1b5 100644 --- a/Operations.hs +++ b/Operations.hs @@ -48,7 +48,7 @@ import qualified Data.Traversable as T -- border set, and its event mask set. -- manage :: Window -> X () -manage w = withDisplay $ \d -> do +manage w = whenX (fmap not $ isClient w) $ withDisplay $ \d -> do setInitialProperties w >> reveal w -- FIXME: This is pretty awkward. We can't can't let "refresh" happen |