remove unneeded Ord constraint.

This commit is contained in:
David Roundy
2007-09-20 21:05:27 +00:00
parent cb13207644
commit f3f12383f0

View File

@@ -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) }