Move state logging into Config.hs, via logHook :: X ()

darcs-hash:20070610061932-9c5c1-9a08992ef555f086007474e64d5ae9d835e9677e

1 files changed, 6 insertions, 4 deletions

diff --git a/Config.hs b/Config.hs
index b420418..f81eac3 100644
--- a/Config.hs
+++ b/Config.hs
@@ -100,11 +100,13 @@ defaultLayouts = [ tiled , mirror tiled , full ]
      delta   = 3%100
 
 --
--- Enable logging of state changes to stdout.
--- The internal state of the window manager is 'shown' in Haskell data format
+-- Perform an arbitrary action on each state change.
+-- Examples include:
+--      * do nothing
+--      * log the state to stdout
 --
-logging :: Bool
-logging = False
+logHook :: X ()
+logHook = return ()
 
 --
 -- The key bindings list.