git-annex/Types/Limit.hs

21 lines
402 B
Haskell
Raw Normal View History

2013-10-28 18:05:55 +00:00
{- types for limits
-
- Copyright 2013 Joey Hess <joey@kitenet.net>
-
- Licensed under the GNU GPL version 3 or higher.
-}
{-# LANGUAGE CPP #-}
module Types.Limit where
import Common.Annex
import Types.FileMatcher
import qualified Data.Set as S
type MkLimit = String -> Either String MatchFiles
2013-10-28 18:05:55 +00:00
type AssumeNotPresent = S.Set UUID
type MatchFiles = AssumeNotPresent -> FileInfo -> Annex Bool