diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-10-08 17:58:32 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-10-08 17:58:32 -0400 |
| commit | a56d3c92b9672c6d84ac007a404b07d3eeb51025 (patch) | |
| tree | 2264ea086ca39f7243deb1adfcb085551006b07d /Command/Import.hs | |
| parent | d5494842274030d21356c7492e6de5969173c34d (diff) | |
support invalidating existing VerifiedCopys
Diffstat (limited to 'Command/Import.hs')
| -rw-r--r-- | Command/Import.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Import.hs b/Command/Import.hs index fbce4c55a..3206ad48b 100644 --- a/Command/Import.hs +++ b/Command/Import.hs @@ -143,4 +143,4 @@ verifiedExisting key destfile = do (remotes, trusteduuids) <- knownCopies key untrusteduuids <- trustGet UnTrusted let tocheck = Remote.remotesWithoutUUID remotes (trusteduuids++untrusteduuids) - verifyEnoughCopies [] key need [] (map TrustedCopy trusteduuids) tocheck + verifyEnoughCopies [] key need [] (map (mkVerifiedCopy TrustedCopy) trusteduuids) tocheck |