precommit: Optimise to avoid calling git-check-attr more than once.

This commit is contained in:
Joey Hess 2010-11-28 14:19:43 -04:00
parent 1f9ce9e9a5
commit 92e5d28ca8
5 changed files with 29 additions and 26 deletions

View file

@ -34,7 +34,7 @@ start pair@(file, _) = notAnnexed file $ do
showStart "add" file
return $ Just $ perform pair
perform :: (FilePath, Maybe Backend) -> SubCmdPerform
perform :: BackendFile -> SubCmdPerform
perform (file, backend) = do
stored <- Backend.storeFileKey file backend
case stored of