Added new "anything" preferred content expression, which matches all versions of all files.

1 files changed, 4 insertions, 0 deletions

diff --git a/Limit.hs b/Limit.hs
index c412637bb..da9b6a155 100644
--- a/Limit.hs
+++ b/Limit.hs
@@ -193,6 +193,10 @@ limitUnused :: MatchFiles Annex
 limitUnused _ (MatchingFile _) = return False
 limitUnused _ (MatchingKey k) = S.member k <$> unusedKeys
 
+{- Limit that matches any version of any file. -}
+limitAnything :: MatchFiles Annex
+limitAnything _ _ = return True
+
 {- Adds a limit to skip files not believed to be present in all
  - repositories in the specified group. -}
 addInAllGroup :: String -> Annex ()