rename getKey to genKey

for consistency with external backend protocol
This commit is contained in:
Joey Hess 2020-07-20 14:06:05 -04:00
parent d1300eca2e
commit c4cc2cdf4c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
8 changed files with 13 additions and 13 deletions

View file

@ -56,7 +56,7 @@ defaultBackend = maybe cache return =<< Annex.getState Annex.backend
genKey :: KeySource -> MeterUpdate -> Maybe Backend -> Annex (Key, Backend)
genKey source meterupdate preferredbackend = do
b <- maybe defaultBackend return preferredbackend
case B.getKey b of
case B.genKey b of
Just a -> do
k <- a source meterupdate
return (makesane k, b)