This commit is contained in:
Joey Hess 2011-10-05 16:02:51 -04:00
parent c199a01dd1
commit 6a6ea06cee
73 changed files with 73 additions and 73 deletions

View file

@ -15,7 +15,7 @@ import Control.Exception.Control (handle)
import Control.Monad.IO.Control (liftIOOp)
import Control.Exception hiding (handle, throw)
import Annex.Common
import Common.Annex
{- Runs an Annex action, with setup and cleanup both in the IO monad. -}
bracketIO :: IO c -> (c -> IO b) -> Annex a -> Annex a