hlint
This commit is contained in:
parent
dd667844b6
commit
b61c6bc2ff
18 changed files with 50 additions and 52 deletions
2
Limit.hs
2
Limit.hs
|
@ -82,7 +82,7 @@ addExclude = addLimit . limitExclude
|
|||
limitExclude :: MkLimit Annex
|
||||
limitExclude glob = Right $ const $ return . not . matchGlobFile glob
|
||||
|
||||
matchGlobFile :: String -> (MatchInfo -> Bool)
|
||||
matchGlobFile :: String -> MatchInfo -> Bool
|
||||
matchGlobFile glob = go
|
||||
where
|
||||
cglob = compileGlob glob CaseSensative -- memoized
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue