diff options
author | Joey Hess <joey@kitenet.net> | 2012-10-10 12:59:45 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-10-10 12:59:45 -0400 |
commit | cf30e43a0d5d0c3c76d25daca678ec8cc80dc814 (patch) | |
tree | 18212fc4269da063889d85fcbad0bb6c9d37a086 /Limit.hs | |
parent | cd8d030092b5213e69c99575af71759d0d77abbb (diff) |
rename --ingroup to --inallgroup
Diffstat (limited to 'Limit.hs')
-rw-r--r-- | Limit.hs | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -139,13 +139,13 @@ limitCopies want = case split ":" want of {- Adds a limit to skip files not believed to be present in all - repositories in the specified group. -} -addInGroup :: String -> Annex () -addInGroup groupname = do +addInAllGroup :: String -> Annex () +addInAllGroup groupname = do m <- groupMap - addLimit $ limitInGroup m groupname + addLimit $ limitInAllGroup m groupname -limitInGroup :: GroupMap -> MkLimit -limitInGroup m groupname +limitInAllGroup :: GroupMap -> MkLimit +limitInAllGroup m groupname | S.null want = Right $ const $ const $ return True | otherwise = Right $ \notpresent -> Backend.lookupFile >=> check notpresent |