From 5eaaa1b3c2873bd737675c0d5fce7e10569cbf4f Mon Sep 17 00:00:00 2001
From: Matthias Schiffer <mschiffer@universe-factory.net>
Date: Tue, 10 Sep 2013 21:00:19 +0200
Subject: Add debug some output

---
 XMonad/Operations.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/XMonad/Operations.hs b/XMonad/Operations.hs
index 79feba1..c2e4b1a 100644
--- a/XMonad/Operations.hs
+++ b/XMonad/Operations.hs
@@ -142,6 +142,7 @@ windows f = do
     isMouseFocused <- asks mouseFocused
     unless isMouseFocused $ clearEvents enterWindowMask
     asks (logHook . config) >>= userCodeDef ()
+    gets windowset >>= trace . show
 
 -- | Produce the actual rectangle from a screen and a ratio on that screen.
 scaleRationalRect :: Rectangle -> W.RationalRect -> Rectangle
-- 
cgit v1.2.3