diff --git a/Command/Lock.hs b/Command/Lock.hs
index 3d085393a8..620da40133 100644
--- a/Command/Lock.hs
+++ b/Command/Lock.hs
@@ -91,8 +91,10 @@ perform file key = do
 		liftIO $ removeWhenExistsWith R.removeLink obj
 		case mfile of
 			Just unmodified ->
-				unlessM (checkedCopyFile key unmodified obj Nothing)
-					lostcontent
+				ifM (checkedCopyFile key unmodified obj Nothing)
+					( Database.Keys.storeInodeCaches key [obj]
+					, lostcontent
+					)
 			Nothing -> lostcontent
 
 	lostcontent = logStatus key InfoMissing