From 01c701b5a5c18cfa952394ae1cbd2249cfd08f51 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 3 Feb 2016 13:23:34 -0400 Subject: simplify --- Logs/PreferredContent.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Logs') diff --git a/Logs/PreferredContent.hs b/Logs/PreferredContent.hs index 712973ee4..a74effb92 100644 --- a/Logs/PreferredContent.hs +++ b/Logs/PreferredContent.hs @@ -125,7 +125,7 @@ makeMatcher groupmap configmap groupwantedmap u = go True True unknownMatcher :: UUID -> FileMatcher Annex unknownMatcher u = generate [present] where - present = Operation $ matchPresent (Just u) + present = Operation $ limitPresent (Just u) {- Checks if an expression can be parsed, if not returns Just error -} checkPreferredContentExpression :: PreferredContentExpression -> Maybe String -- cgit v1.2.3