diff options
| author | Joey Hess <joey@kitenet.net> | 2014-05-10 10:46:36 -0300 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-05-10 10:46:36 -0300 |
| commit | dd0e3495cc6bf05eee99ecd437ad67bf5f4842c0 (patch) | |
| tree | bb98422e69b5933bf3da74b142c87aba549ce86d /Utility/Exception.hs | |
| parent | c2375ae087903fb2c956eb046adf857b6b2f4ae2 (diff) | |
merge from git-annex
Diffstat (limited to 'Utility/Exception.hs')
| -rw-r--r-- | Utility/Exception.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Exception.hs b/Utility/Exception.hs index cf2c615c..6f3c059f 100644 --- a/Utility/Exception.hs +++ b/Utility/Exception.hs @@ -18,7 +18,7 @@ import Utility.Data {- Catches IO errors and returns a Bool -} catchBoolIO :: IO Bool -> IO Bool -catchBoolIO a = catchDefaultIO False a +catchBoolIO = catchDefaultIO False {- Catches IO errors and returns a Maybe -} catchMaybeIO :: IO a -> IO (Maybe a) |