summaryrefslogtreecommitdiff
path: root/Utility/Exception.hs
diff options
context:
space:
mode:
authorJoey Hess2014-05-10 11:13:47 -0300
committerJoey Hess2014-05-10 11:13:47 -0300
commiteb6e6fe11290971b37a18d9a78f6d9b78228c06f (patch)
tree5c7669b6ce12a8e7c95e918e69548de31eb4fba7 /Utility/Exception.hs
parent6088df9105a10ef446cc236982c2e30857182a84 (diff)
parentd7ad05acaaf05c7af066c1d41f3e70e61a9bec96 (diff)
Merge branch 'joeyconfig'
Diffstat (limited to 'Utility/Exception.hs')
-rw-r--r--Utility/Exception.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/Exception.hs b/Utility/Exception.hs
index cf2c615c..1fecf65d 100644
--- a/Utility/Exception.hs
+++ b/Utility/Exception.hs
@@ -2,7 +2,7 @@
-
- Copyright 2011-2012 Joey Hess <joey@kitenet.net>
-
- - Licensed under the GNU GPL version 3 or higher.
+ - License: BSD-2-clause
-}
{-# LANGUAGE ScopedTypeVariables #-}
@@ -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)