twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-06 15:11:53 -07:00
Code Issues Packages Projects Releases Wiki Activity

Whitespace fixes for Properties.hs

Browse Source
This commit is contained in:
Spencer Janssen
2007-10-15 02:27:57 +00:00
parent bd6a52e587
commit 01cf4a5581
1 changed files with 11 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
tests/Properties.hs
View File

@@ -458,7 +458,7 @@ prop_delete_focus_not_end (x :: T) =
-- preserve order -- preserve order
prop_filter_order (x :: T) = prop_filter_order (x :: T) =
case stack $ workspace $ current x of case stack $ workspace $ current x of
Nothing -> True Nothing -> True
Just s@(Stack i _ _) -> integrate' (S.filter (/= i) s) == filter (/= i) (integrate' (Just s)) Just s@(Stack i _ _) -> integrate' (S.filter (/= i) s) == filter (/= i) (integrate' (Just s))
-- --------------------------------------------------------------------- -- ---------------------------------------------------------------------