diff options
author | Brent Yorgey <byorgey@gmail.com> | 2007-10-22 22:41:05 +0200 |
---|---|---|
committer | Brent Yorgey <byorgey@gmail.com> | 2007-10-22 22:41:05 +0200 |
commit | 0537e591a915f47c9227940163a16df40f14eedb (patch) | |
tree | 4f89506d223396f228815e2b4b0ccc1608046408 /Operations.hs | |
parent | e8928472be87183609883032a09fe01dfb3195b6 (diff) | |
download | xmonad-0537e591a915f47c9227940163a16df40f14eedb.tar.gz xmonad-0537e591a915f47c9227940163a16df40f14eedb.tar.xz xmonad-0537e591a915f47c9227940163a16df40f14eedb.zip |
Replace 'findIndex' with 'findTag', which more accurately describes what the function does.
I realize this is a big change, but the name 'findIndex' was confusing for me, since I expected it to return some sort of integer. What it actually does, of course, is return a workspace tag, which might be more general than an index.
Of course, this change breaks several contrib modules; I'll submit a patch to make the change there as well.
darcs-hash:20071022204105-bd4d7-9f5d5b8ce00c61b4830fde329f528b2d79af2fa6.gz
Diffstat (limited to 'Operations.hs')
-rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index ba8d109..d4b6f3e 100644 --- a/Operations.hs +++ b/Operations.hs @@ -564,7 +564,7 @@ float :: Window -> X () float w = do (sc, rr) <- floatLocation w windows $ \ws -> W.float w rr . fromMaybe ws $ do - i <- W.findIndex w ws + i <- W.findTag w ws guard $ i `elem` map (W.tag . W.workspace) (W.screens ws) f <- W.peek ws sw <- W.lookupWorkspace sc ws |