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

propigate error

Browse source
This commit is contained in:
Joey Hess 2016-07-20 13:44:33 -04:00
parent 857d3c3180
commit 4236dc83a8
Failed to extract signature
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
CmdLine/Seek.hs
View file

@ -204,7 +204,8 @@ withKeyOptions' ko auto mkkeyaction fallbackaction params = do
forM_ l $ \i -> forM_ l $ \i ->
maybe noop (\k -> keyaction (return [k])) maybe noop (\k -> keyaction (return [k]))
=<< catKey (LsTree.sha i) =<< catKey (LsTree.sha i)
liftIO $ void cleanup unlessM (liftIO cleanup) $
error ("git ls-tree " ++ Git.fromRef b ++ " failed")
prepFiltered :: (FilePath -> CommandStart) -> Annex [FilePath] -> Annex [CommandStart] prepFiltered :: (FilePath -> CommandStart) -> Annex [FilePath] -> Annex [CommandStart]
prepFiltered a fs = do prepFiltered a fs = do