since we just ignore type errors, no need to derive Show

darcs-hash:20070504094143-9c5c1-44d5edcd4b261a2d93b054f48e7818b0c9e58db2.gz

1 files changed, 1 insertions, 1 deletions

diff --git a/XMonad.hs b/XMonad.hs
index b20f3f7..71270e0 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -104,7 +104,7 @@ data Layout = Layout { doLayout     :: Rectangle -> [Window] -> [(Window, Rectan
 -- 
 -- User-extensible messages must be a member of this class:
 --
-class (Typeable a, Show a) => Message a
+class Typeable a => Message a
 
 --
 -- A wrapped value of some type in the Message class.