From 80d45dce0b915ccd2ff6c4ad4938d76b233a553b Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 11 Jun 2007 21:58:27 +0200
Subject: Comment only

darcs-hash:20070611195827-a5988-a923fd26d5e2d440118981fe5164fee5b37234f2
---
 Operations.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/Operations.hs b/Operations.hs
index e39fdac..977d224 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -335,10 +335,8 @@ setFocusX w = withWindowSet $ \ws -> do
 switchLayout :: X ()
 switchLayout = layout (\(x, xs) -> let xs' = xs ++ [x] in (head xs', tail xs'))
 
--- | Throw an (extensible) message value to the current Layout scheme,
--- possibly modifying how we layout the windows, then refresh.
---
--- TODO, this will refresh on Nothing.
+-- | Throw a message to the current Layout possibly modifying how we
+-- layout the windows, then refresh.
 --
 sendMessage :: Message a => a -> X ()
 sendMessage a = do n <- (W.tag . W.workspace . W.current) `fmap` gets windowset
-- 
cgit v1.2.3