commented out implementation state logging. if someone has a client, we can enable this

darcs-hash:20070601085626-9c5c1-668bec95074ab7050c0c8105cf7ec9c2a1c7e1f3

1 files changed, 2 insertions, 1 deletions

diff --git a/Operations.hs b/Operations.hs
index 1a25e99..243da7e 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -23,11 +23,11 @@ import Data.Bits            ((.|.))
 import Data.Ratio
 import qualified Data.Map as M
 
--- import System.Mem (performGC)
 import Control.Monad.State
 import Control.Monad.Reader
 import Control.Arrow
 
+import System.IO
 import Graphics.X11.Xlib
 import Graphics.X11.Xinerama (getScreenInfo)
 import Graphics.X11.Xlib.Extras
@@ -197,6 +197,7 @@ refresh = do
 
     setTopFocus
     clearEnterEvents
+    -- withWindowSet (io . hPrint stderr) -- logging state changes!
 --  io performGC -- really helps 
 
 -- | clearEnterEvents.  Remove all window entry events from the event queue.