aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-06-11 23:42:17 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-06-11 23:42:17 +0200
commit382ac3237b7451ab739468596d2b07168c16f5e0 (patch)
tree38168ccabb1d01527bd9e1a04f5e53f15cc8eb1e
parent0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429 (diff)
downloadxmonad-382ac3237b7451ab739468596d2b07168c16f5e0.tar.gz
xmonad-382ac3237b7451ab739468596d2b07168c16f5e0.tar.xz
xmonad-382ac3237b7451ab739468596d2b07168c16f5e0.zip
TODO for scan
darcs-hash:20070611214217-a5988-ac16c4939111434a06ed5b080a82abd1d6e86c28.gz
-rw-r--r--Main.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Main.hs b/Main.hs
index ddcd79e..ca6f5ad 100644
--- a/Main.hs
+++ b/Main.hs
@@ -112,6 +112,8 @@ scan :: Display -> Window -> IO [Window]
scan dpy rootw = do
(_, _, ws) <- queryTree dpy rootw
filterM ok ws
+ -- TODO: scan for windows that are either 'IsViewable' or where WM_STATE ==
+ -- Iconic
where ok w = do wa <- getWindowAttributes dpy w
return $ not (wa_override_redirect wa)
&& wa_map_state wa == waIsViewable