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

wording

Browse source
This commit is contained in:
Joey Hess 2010-10-11 18:39:36 -04:00
parent 530f16b980
commit f6306bc301
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
git-annex.hs
View file

@ -19,7 +19,7 @@ main = do
- and propigating an overall error status at the end. -} - and propigating an overall error status at the end. -}
tryRun errnum oknum [] = do tryRun errnum oknum [] = do
if (errnum > 0) if (errnum > 0)
then error $ (show errnum) ++ " failed ; " ++ show (oknum) ++ " succeeded" then error $ (show errnum) ++ " failed ; " ++ show (oknum) ++ " ok"
else return () else return ()
tryRun errnum oknum (a:as) = do tryRun errnum oknum (a:as) = do
result <- try (a)::IO (Either SomeException ()) result <- try (a)::IO (Either SomeException ())