From 061fbfb37e02a9a9cb42396cce63d9b67d6a9c6e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 28 Oct 2013 14:05:55 -0400 Subject: refactor --- Limit.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'Limit.hs') diff --git a/Limit.hs b/Limit.hs index 826b5e72b..f3586e029 100644 --- a/Limit.hs +++ b/Limit.hs @@ -27,6 +27,7 @@ import Types.TrustLevel import Types.Key import Types.Group import Types.FileMatcher +import Types.Limit import Logs.Group import Utility.HumanTime import Utility.DataUnits @@ -41,10 +42,6 @@ import Types.FileMatcher #endif #endif -type MatchFiles = AssumeNotPresent -> FileInfo -> Annex Bool -type MkLimit = String -> Either String MatchFiles -type AssumeNotPresent = S.Set UUID - {- Checks if there are user-specified limits. -} limited :: Annex Bool limited = (not . Utility.Matcher.isEmpty) <$> getMatcher' -- cgit v1.2.3