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

record VURL key hashes in addcomputed and recompute

Browse source
This commit is contained in:
Joey Hess 2025-03-03 10:57:56 -04:00
parent 2bd64059f1
commit 63d73d8d1b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
4 changed files with 14 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Remote/Compute.hs
View file

@ -482,10 +482,7 @@ computeKey rs (ComputeProgram program) k _af dest p vc =
hb <- hashBackend
let updatevurl key getobj =
if (fromKey keyVariety key == VURLKey)
then do
obj <- getobj
updateEquivilantKeys hb obj key
=<< getEquivilantKeys key
then addEquivilantKey hb key =<< getobj
else return Nothing
let keyfile' = tmpdir </> keyfile