From e0d7522a1b78f03346efa22b0e2c6dd997e1b030 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Mon, 11 Jun 2007 23:42:17 +0200 Subject: TODO for scan darcs-hash:20070611214217-a5988-ac16c4939111434a06ed5b080a82abd1d6e86c28 --- 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