diff options
| -rw-r--r-- | XMonad/Core.hs | 3 |
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 |