summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-09-04 22:39:25 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-09-04 22:39:25 -0400
commitc71ca7d084ff64e153b2d7d586a73bd66ee0a612 (patch)
tree7b55608f1292c8a78d92d9286993f08bc6de2d08
parent732ab57a6ff82e80b06be90d1e1bab1dd9295926 (diff)
unimportant tweak
fix something my internal haskell parser does a double take at
-rw-r--r--Remote/Helper/Encryptable.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Helper/Encryptable.hs b/Remote/Helper/Encryptable.hs
index 01cefe858..70e3663ea 100644
--- a/Remote/Helper/Encryptable.hs
+++ b/Remote/Helper/Encryptable.hs
@@ -50,7 +50,7 @@ encryptionSetup c = maybe genCipher updateCipher $ extractCipher c
cannotchange = error "Cannot set encryption type of existing remotes."
-- Update an existing cipher if possible.
updateCipher v = case v of
- SharedCipher{} | maybe True (== "shared") encryption -> return c'
+ SharedCipher _ | maybe True (== "shared") encryption -> return c'
EncryptedCipher _ variant _
| maybe True (== if variant == HybridCipher then "hybrid" else "pubkey") encryption ->
use "encryption update" $ updateEncryptedCipher newkeys v