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 | e3ef1c28b8862964f7a211b409edbef6056163dc (patch) | |
| tree | 4f89506d223396f228815e2b4b0ccc1608046408 /Operations.hs | |
| parent | 9134aaf952df72b68c0ea491467ef1a4e8814f5b (diff) | |
| download | metatile-e3ef1c28b8862964f7a211b409edbef6056163dc.tar metatile-e3ef1c28b8862964f7a211b409edbef6056163dc.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
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 |