aboutsummaryrefslogtreecommitdiffstats
path: root/tests/Catch.hs
diff options
context:
space:
mode:
authorNeil Mitchell <gentoo-haskell@vcs.intern>2007-05-22 03:54:22 +0200
committerNeil Mitchell <gentoo-haskell@vcs.intern>2007-05-22 03:54:22 +0200
commitc3ab2c0a325feccaac280dabd324be2ba84fb506 (patch)
tree56c30bf0d0f1ee8dedf54dfe9c609e476e3d84b1 /tests/Catch.hs
parent1b48786c62d1bc3076441e1b0ac998988cbe9954 (diff)
downloadxmonad-c3ab2c0a325feccaac280dabd324be2ba84fb506.tar.gz
xmonad-c3ab2c0a325feccaac280dabd324be2ba84fb506.tar.xz
xmonad-c3ab2c0a325feccaac280dabd324be2ba84fb506.zip
Update the Catch checking to the new interface for StackSet
darcs-hash:20070522015422-73ab9-c62473d90f0df78e23a96acec0245e9bb9c275b6.gz
Diffstat (limited to '')
-rw-r--r--tests/Catch.hs18
1 files changed, 15 insertions, 3 deletions
diff --git a/tests/Catch.hs b/tests/Catch.hs
index 7538ff0..ce05212 100644
--- a/tests/Catch.hs
+++ b/tests/Catch.hs
@@ -10,9 +10,21 @@ import StackSet
-- TESTING PROPERTIES
main =
- screen ||| peekStack ||| index ||| empty ||| peek ||| push ||| delete ||| member |||
- raiseFocus ||| rotate ||| promote ||| shift ||| view ||| workspace ||| insert |||
- visibleWorkspaces ||| swap {- helper -}
+ new
+ ||| view
+ ||| lookupWorkspace
+ ||| modify
+ ||| peek
+ ||| index
+ ||| focusLeft
+ ||| focusRight
+ ||| focusWindow
+ ||| member
+ ||| findIndex
+ ||| insertLeft
+ ||| delete
+ ||| swap
+ ||| shift
---------------------------------------------------------------------