mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

avoid warning

Browse source
This commit is contained in:
Joey Hess 2017-10-16 12:54:00 -04:00
parent ef62eb26d0
commit a2bf0c5b6d
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Migrate.hs
View file

@ -74,7 +74,7 @@ perform file oldkey oldbackend newbackend = go =<< genkey
checkcontent = Command.Fsck.checkBackend oldbackend oldkey Command.Fsck.KeyLocked afile checkcontent = Command.Fsck.checkBackend oldbackend oldkey Command.Fsck.KeyLocked afile
finish newkey = ifM (Command.ReKey.linkKey file oldkey newkey) finish newkey = ifM (Command.ReKey.linkKey file oldkey newkey)
( do ( do
copyMetaData oldkey newkey _ <- copyMetaData oldkey newkey
-- If the old key had some associated urls, record them for -- If the old key had some associated urls, record them for
-- the new key as well. -- the new key as well.
urls <- getUrls oldkey urls <- getUrls oldkey