diff options
author | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-04 11:41:43 +0200 |
---|---|---|
committer | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-04 11:41:43 +0200 |
commit | 9b5766de1c90cd4561efd6d568fa0aefa010a815 (patch) | |
tree | 216438872bdb8186ee9756059f62cae2ea2febde /Operations.hs | |
parent | d93284dd514485bdc06c1bb6b984608271804dcb (diff) | |
download | metatile-9b5766de1c90cd4561efd6d568fa0aefa010a815.tar metatile-9b5766de1c90cd4561efd6d568fa0aefa010a815.zip |
since we just ignore type errors, no need to derive Show
darcs-hash:20070504094143-9c5c1-44d5edcd4b261a2d93b054f48e7818b0c9e58db2
Diffstat (limited to 'Operations.hs')
-rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index c90ff09..0b45b75 100644 --- a/Operations.hs +++ b/Operations.hs @@ -96,7 +96,7 @@ sendMessage a = layout $ \x@(l, ls) -> maybe x (flip (,) ls) (modifyLayout l (So -- Expand -- -data Resize = Shrink | Expand deriving (Typeable, Show) +data Resize = Shrink | Expand deriving Typeable instance Message Resize full :: Layout |