diff --git a/Remote/Helper/Encryptable.hs b/Remote/Helper/Encryptable.hs index 70e3663ea0..29e51c0022 100644 --- a/Remote/Helper/Encryptable.hs +++ b/Remote/Helper/Encryptable.hs @@ -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