From 5294b3dc35bfff087cab0b13d9a32fbf62f2a96b Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@cse.unsw.edu.au>
Date: Sun, 10 Jun 2007 08:19:32 +0200
Subject: Move state logging into Config.hs, via logHook :: X ()

darcs-hash:20070610061932-9c5c1-9a08992ef555f086007474e64d5ae9d835e9677e
---
 Config.hs | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'Config.hs')

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.
-- 
cgit v1.2.3