diff options
author | Joey Hess <joey@kitenet.net> | 2012-06-12 13:54:00 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-06-12 13:54:00 -0400 |
commit | d3b9b32f2193520242fecf973fd1d3c1f2254003 (patch) | |
tree | 36cdef203380c9ff25dc1be57d3472c2b320375e | |
parent | 2e5ea30981251fbdce38e18f3521917742c892a3 (diff) |
cleanup
-rw-r--r-- | Command/Watch.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/Command/Watch.hs b/Command/Watch.hs index 0ee932dba..1c4f61a55 100644 --- a/Command/Watch.hs +++ b/Command/Watch.hs @@ -157,10 +157,8 @@ withStateMVar a = do {- Runs an Annex action, using the state from the MVar. -} runStateMVar :: MVar Annex.AnnexState -> Annex a -> IO a runStateMVar mvar a = do - liftIO $ putStrLn "takeMVar" startstate <- takeMVar mvar !(r, newstate) <- Annex.run startstate a - liftIO $ putStrLn "putMVar" putMVar mvar newstate return r |