we should check for OverrideRedirect on initial scan too

This commit is contained in:
Don Stewart
2007-03-09 13:06:08 +00:00
parent 2ed6f203c4
commit f1905e2699

View File

@@ -73,9 +73,13 @@ main = do
sync dpy False
grabKeys dpy r
(_, _, ws) <- io $ queryTree dpy r
-- scan for initial windows
forM_ ws $ \w -> do
wa <- io $ getWindowAttributes dpy w
when (waMapState wa == waIsViewable) (manage w)
when (not (waOverrideRedirect wa) && waMapState wa == waIsViewable)
(manage w)
forever $ handle =<< io (allocaXEvent $ \ev ->
nextEvent dpy ev >> getEvent ev)
return ()