From a51f1a4ee44c0cab345068d79d98285f4d022006 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 4 Sep 2013 22:39:25 -0400 Subject: [PATCH] unimportant tweak fix something my internal haskell parser does a double take at --- Remote/Helper/Encryptable.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Remote/Helper/Encryptable.hs b/Remote/Helper/Encryptable.hs index 01cefe8588..70e3663ea0 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