mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

Fix bug in --exclude introduced in 0.20110516.

Browse source
This commit is contained in:
Joey Hess 2011-05-27 20:20:20 -04:00
parent 224977900d
commit 001edb008a
2 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command.hs
View file

@ -191,7 +191,7 @@ filterFiles l = do
else return $ filter (notExcluded $ wildsRegex exclude) l' else return $ filter (notExcluded $ wildsRegex exclude) l'
where where
notState f = not $ stateDir `isPrefixOf` f notState f = not $ stateDir `isPrefixOf` f
notExcluded r f = isJust $ match r f [] notExcluded r f = isNothing $ match r f []
wildsRegex :: [String] -> Regex wildsRegex :: [String] -> Regex
wildsRegex ws = compile regex [] wildsRegex ws = compile regex []

1
debian/changelog vendored
View file

@ -2,6 +2,7 @@ git-annex (0.20110522) UNRELEASED; urgency=low
* Closer emulation of git's behavior when told to use "foo/.git" as a * Closer emulation of git's behavior when told to use "foo/.git" as a
git repository instead of just "foo". Closes: #627563 git repository instead of just "foo". Closes: #627563
* Fix bug in --exclude introduced in 0.20110516.
-- Joey Hess <joeyh@debian.org> Sun, 22 May 2011 14:03:42 -0400 -- Joey Hess <joeyh@debian.org> Sun, 22 May 2011 14:03:42 -0400