diff --git a/Annex/Content.hs b/Annex/Content.hs
index 7c95621031..a6ef6a73cd 100644
--- a/Annex/Content.hs
+++ b/Annex/Content.hs
@@ -6,7 +6,6 @@
  -}
 
 {-# LANGUAGE CPP #-}
-{-# LANGUAGE OverloadedStrings #-}
 
 module Annex.Content (
 	inAnnex,
@@ -499,19 +498,15 @@ prepSendAnnex key = withObjectLoc key $ \f -> do
 		-- change while the transfer is in progress, so
 		-- generate an inode cache for the starting
 		-- content.
-		then do
-			fastDebug "Annex.Content" ("found no inode cache for " ++ show f)
-			maybeToList <$>
-				withTSDelta (liftIO . genInodeCache f)
+		then maybeToList <$>
+			withTSDelta (liftIO . genInodeCache f)
 		-- Verify that the object is not modified. Usually this
 		-- only has to check the inode cache, but if the cache
 		-- is somehow stale, it will fall back to verifying its
 		-- content.
 		else withTSDelta (liftIO . genInodeCache f) >>= \case
 			Just fc -> ifM (isUnmodified' key f fc cache)
-				( do
-					fastDebug "Annex.Content" ("found inode cache for " ++ show f)
-					return (fc:cache)
+				( return (fc:cache)
 				, return []
 				)
 			Nothing -> return []