remove unncessary debugs

Keeping the ones in Annex.InodeSentinal

diff --git a/Annex/Content.hs b/Annex/Content.hs
index 7c9562103181bac561fd89bd7a24ff0f0c37efcf..a6ef6a73cda6eefe0b02c9f5d9ea73ee3488e107 100644 (file)
--- 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 []