diff options
| -rw-r--r-- | Command/ReKey.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/ReKey.hs b/Command/ReKey.hs index 2bd4541c6..6de7e45e3 100644 --- a/Command/ReKey.hs +++ b/Command/ReKey.hs @@ -46,9 +46,9 @@ perform file oldkey newkey = do {- Make a hard link to the old key content, to avoid wasting disk space. -} linkKey :: Key -> Key -> Annex Bool -linkKey oldkey newkey = getViaTmpUnchecked newkey $ \t -> do +linkKey oldkey newkey = getViaTmpUnchecked newkey $ \tmp -> do src <- inRepo $ gitAnnexLocation oldkey - liftIO $ unlessM (doesFileExist t) $ createLink src t + liftIO $ unlessM (doesFileExist tmp) $ createLink src tmp return True cleanup :: FilePath -> Key -> Key -> CommandCleanup |