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

avoid pre-commit hook messing up new-style unlocked files in v6 repo

Browse source
This commit is contained in:
Joey Hess 2015-12-09 15:18:25 -04:00
parent 05b598a057
commit 751120c171
Failed to extract signature
4 changed files with 24 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

2
CmdLine/Seek.hs
View file

@ -115,7 +115,7 @@ withPairs a params = seekActions $ return $ map a $ pairs [] params
pairs c (x:y:xs) = pairs ((x,y):c) xs
pairs _ _ = error "expected pairs"
withFilesToBeCommitted :: (String -> CommandStart) -> CmdParams -> CommandSeek
withFilesToBeCommitted :: (FilePath -> CommandStart) -> CmdParams -> CommandSeek
withFilesToBeCommitted a params = seekActions $ prepFiltered a $
seekHelper LsFiles.stagedNotDeleted params