From e2c894d3df9cba09d16d3bcd311bc129030b7876 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Fri, 26 Oct 2018 12:56:40 -0400
Subject: [PATCH] remove debug prints

---
 Annex/Content.hs | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/Annex/Content.hs b/Annex/Content.hs
index e7574d87be..b58f3e10b9 100644
--- a/Annex/Content.hs
+++ b/Annex/Content.hs
@@ -750,21 +750,17 @@ isUnmodified key f = go =<< geti
 	go (Just fc) = isUnmodifiedCheap' key fc <||> expensivecheck fc
 	expensivecheck fc = ifM (verifyKeyContent RetrievalAllKeysSecure AlwaysVerify UnVerified key f)
 		( do
-			liftIO $ print "content verified"
 			-- The file could have been modified while it was
 			-- being verified. Detect that.
 			ifM (geti >>= maybe (return False) (compareInodeCaches fc))
 				( do
 					-- Update the InodeCache to avoid
 					-- performing this expensive check again.
-					liftIO $ print "update inode cache"
 					Database.Keys.addInodeCaches key [fc]
 					return True
 				, return False
 				)
-		, do
-			liftIO $ print "content not verified"
-			return False
+		, return False
 		)
 	geti = withTSDelta (liftIO . genInodeCache f)