summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--XMonad/Core.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index a25b47e..1603034 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -270,7 +270,8 @@ class Show (layout a) => LayoutClass layout a where
--
-- Layouts which do not need access to the 'X' monad to decide how
-- to handle messages should implement 'pureMessage' instead of
- -- 'handleMessage'.
+ -- 'handleMessage' (this restricts the risk of error, and makes
+ -- testing much easier).
handleMessage :: layout a -> SomeMessage -> X (Maybe (layout a))
handleMessage l = return . pureMessage l