allow building with old versions of exceptions before MonadMask was split out

1 files changed, 2 insertions, 0 deletions

diff --git a/Annex.hs b/Annex.hs
index 9ecb914cb..bb0b6f084 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -79,7 +79,9 @@ newtype Annex a = Annex { runAnnex :: ReaderT (MVar AnnexState) IO a }
 		MonadReader (MVar AnnexState),
 		MonadCatch,
 		MonadThrow,
+#if MIN_VERSION_exceptions(0,6,0)
 		MonadMask,
+#endif
 		Functor,
 		Applicative
 	)