From 382ac3237b7451ab739468596d2b07168c16f5e0 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 11 Jun 2007 23:42:17 +0200
Subject: TODO for scan

darcs-hash:20070611214217-a5988-ac16c4939111434a06ed5b080a82abd1d6e86c28.gz
---
 Main.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Main.hs')

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
-- 
cgit v1.2.3