diff --git a/Command/Migrate.hs b/Command/Migrate.hs
index 8924b1780b..a68aee695f 100644
--- a/Command/Migrate.hs
+++ b/Command/Migrate.hs
@@ -74,7 +74,7 @@ perform file oldkey oldbackend newbackend = go =<< genkey
 	checkcontent = Command.Fsck.checkBackend oldbackend oldkey Command.Fsck.KeyLocked afile
 	finish newkey = ifM (Command.ReKey.linkKey file oldkey newkey)
 		( do
-			copyMetaData oldkey newkey
+			_ <- copyMetaData oldkey newkey
 			-- If the old key had some associated urls, record them for
 			-- the new key as well.
 			urls <- getUrls oldkey