Preferred content path matching bugfix.

When in a subdir, both the normal filepath, and the filepath relative to
the top of the git repo are needed for matching. The former for key lookup,
and the latter for include/exclude to match against. Previously, key lookup
didn't work in this situation.
This commit is contained in:
Joey Hess 2012-10-17 16:01:09 -04:00
parent 59170c4187
commit e7780a39f5
6 changed files with 37 additions and 29 deletions

View file

@ -113,7 +113,7 @@ prepFiltered a fs = do
map (process matcher) <$> fs
where
process matcher f = do
ok <- matcher f
ok <- matcher $ Annex.FileInfo f f
if ok then a f else return Nothing
notSymlink :: FilePath -> IO Bool