summaryrefslogtreecommitdiff
path: root/Command/RecvKey.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-10-01 13:28:49 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-10-01 13:29:17 -0400
commite3969aeb3c1d8a91a31d4da31097ab5c59436774 (patch)
tree7fd39a284fa2d7ed37a3aab5edbbe5f80cce76d0 /Command/RecvKey.hs
parent5be958bddc3afeabe51bd9da598682617ba4e0e7 (diff)
rename fsckKey to verifyKeyContent
No behavior changes.
Diffstat (limited to 'Command/RecvKey.hs')
-rw-r--r--Command/RecvKey.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Command/RecvKey.hs b/Command/RecvKey.hs
index cb24dbb47..7477bb879 100644
--- a/Command/RecvKey.hs
+++ b/Command/RecvKey.hs
@@ -70,13 +70,13 @@ start key = fieldTransfer Download key $ \_p ->
Nothing -> do
warning "recvkey: received key from direct mode repository using unknown backend; cannot check; discarding"
return False
- Just backend -> maybe (return True) runfsck
- (Types.Backend.fsckKey backend)
+ Just backend -> maybe (return True) runverify
+ (Types.Backend.verifyKeyContent backend)
else do
warning "recvkey: received key with wrong size; discarding"
return False
where
- runfsck check = ifM (check key tmp)
+ runverify check = ifM (check key tmp)
( return True
, do
warning "recvkey: received key from direct mode repository seems to have changed as it was transferred; discarding"