diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-08 13:39:18 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-08 13:39:18 -0400 |
| commit | 1ccd0ed1e6541534626673dc5dbdd97c9ab9ca49 (patch) | |
| tree | d640f8081735fc7eb3a81fae4c93df85ddc366c5 /Logs/PreferredContent.hs | |
| parent | 45d50d8c27207fa09e5d3331683e1510df3f3bdd (diff) | |
Added --smallerthan and --largerthan limits
Diffstat (limited to 'Logs/PreferredContent.hs')
| -rw-r--r-- | Logs/PreferredContent.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Logs/PreferredContent.hs b/Logs/PreferredContent.hs index 8d812ec4d..3da5cc329 100644 --- a/Logs/PreferredContent.hs +++ b/Logs/PreferredContent.hs @@ -21,7 +21,7 @@ import Common.Annex import qualified Annex.Branch import qualified Annex import Logs.UUIDBased -import Limit (MatchFiles, AssumeNotPresent, limitInclude, limitExclude, limitIn, limitCopies, limitInBackend) +import Limit import qualified Utility.Matcher import Annex.UUID import Git.FilePath @@ -96,6 +96,8 @@ parseToken t , ("in", limitIn) , ("copies", limitCopies) , ("backend", limitInBackend) + , ("largerthan", limitSize (>)) + , ("smallerthan", limitSize (<)) ] use a = Utility.Matcher.Operation <$> a v |