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

tabs

Browse source
This commit is contained in:
Joey Hess 2013-09-04 22:47:53 -04:00
parent a51f1a4ee4
commit 2b9f3cc175
1 changed files with 1 additions and 1 deletions

2
Remote/Helper/Encryptable.hs
View file

@ -143,7 +143,7 @@ cipherKey c k = fmap make <$> remoteCipher c
where
make ciphertext = (cipContent ciphertext, encryptKey mac ciphertext k)
cipContent
| M.lookup "encryption" c /= Just "pubkey" = id
| M.lookup "encryption" c /= Just "pubkey" = id
| otherwise = const $ Cipher ""
mac = fromMaybe defaultMac $ M.lookup "mac" c >>= readMac