diff options
| author | David Roundy <droundy@darcs.net> | 2007-05-05 19:54:15 +0200 |
|---|---|---|
| committer | David Roundy <droundy@darcs.net> | 2007-05-05 19:54:15 +0200 |
| commit | 6958bd88b7031903652db239fdb6c1e4d94b945b (patch) | |
| tree | 3e8c7b3a9e30f211129f0f80e9d745c7c93f0e0f /StackSet.hs | |
| parent | 23a3031e391b4f5394cce656777bed2859fdecc0 (diff) | |
| download | xmonad-6958bd88b7031903652db239fdb6c1e4d94b945b.tar.gz xmonad-6958bd88b7031903652db239fdb6c1e4d94b945b.tar.xz xmonad-6958bd88b7031903652db239fdb6c1e4d94b945b.zip | |
make quickcheck tests friendlier to read.
darcs-hash:20070505175415-72aca-2129b8432f6f2ddb9d1498b0503b86c401020194.gz
Diffstat (limited to 'StackSet.hs')
| -rw-r--r-- | StackSet.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/StackSet.hs b/StackSet.hs index 7b47e06..3e35f53 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -46,7 +46,7 @@ data StackSet i j a = , stacks :: !(M.Map i ([a], [a])) -- ^ screen -> (floating, normal) , focus :: !(M.Map i a) -- ^ the window focused in each stack , cache :: !(M.Map a i) -- ^ a cache of windows back to their stacks - } deriving (Eq, Show) + } deriving (Eq, Show, Read) -- The cache is used to check on insertion that we don't already have -- this window managed on another stack |