diff options
| author | David Roundy <droundy@darcs.net> | 2007-09-20 23:05:27 +0200 |
|---|---|---|
| committer | David Roundy <droundy@darcs.net> | 2007-09-20 23:05:27 +0200 |
| commit | 49c725b6281a9700999f86c0d8ecfa6018ee030a (patch) | |
| tree | 8abb504c7a5657adb476c25980ef247e19527d8c | |
| parent | 5afccb9ca64e30a6c0eadfe8435ba9917fb4a214 (diff) | |
| download | metatile-49c725b6281a9700999f86c0d8ecfa6018ee030a.tar metatile-49c725b6281a9700999f86c0d8ecfa6018ee030a.zip | |
remove unneeded Ord constraint.
darcs-hash:20070920210527-72aca-d8e4535b8c015a30c5c274ad12629e891a8eaec2
| -rw-r--r-- | StackSet.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/StackSet.hs b/StackSet.hs index 501e99f..e6c2433 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -463,7 +463,7 @@ delete w = sink w . delete' w -- | Only temporarily remove the window from the stack, thereby not destroying special -- information saved in the Stackset -delete' :: (Ord a, Eq s) => a -> StackSet i a s sd -> StackSet i a s sd +delete' :: (Eq a, Eq s) => a -> StackSet i a s sd -> StackSet i a s sd delete' w s = s { current = removeFromScreen (current s) , visible = map removeFromScreen (visible s) , hidden = map removeFromWorkspace (hidden s) } |