From 70892f0bde72d777451510c11be845a8f201bbd2 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 10 Aug 2014 19:40:21 -0400 Subject: qualify catch and try got a build failure on android due to there being a Prelude.catch --- Utility/Exception.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Utility/Exception.hs') diff --git a/Utility/Exception.hs b/Utility/Exception.hs index 802e9e24b..ef3ab1dac 100644 --- a/Utility/Exception.hs +++ b/Utility/Exception.hs @@ -52,11 +52,11 @@ catchMsgIO a = do {- catch specialized for IO errors only -} catchIO :: MonadCatch m => m a -> (IOException -> m a) -> m a -catchIO = catch +catchIO = M.catch {- try specialized for IO errors only -} tryIO :: MonadCatch m => m a -> m (Either IOException a) -tryIO = try +tryIO = M.try {- bracket with setup and cleanup actions lifted to IO. - -- cgit v1.2.3