(defvar epa-mail-mode-map
   (let ((keymap (make-sparse-keymap)))
-    (define-key keymap "C-cC-ed" 'epa-mail-decrypt)
-    (define-key keymap "C-cC-ev" 'epa-mail-verify)
-    (define-key keymap "C-cC-es" 'epa-mail-sign)
-    (define-key keymap "C-cC-ee" 'epa-mail-encrypt)
-    (define-key keymap "C-cC-ei" 'epa-mail-import-keys)
-    (define-key keymap "C-cC-eo" 'epa-insert-keys)
+    (define-key keymap "\C-c\C-ed" 'epa-mail-decrypt)
+    (define-key keymap "\C-c\C-ev" 'epa-mail-verify)
+    (define-key keymap "\C-c\C-es" 'epa-mail-sign)
+    (define-key keymap "\C-c\C-ee" 'epa-mail-encrypt)
+    (define-key keymap "\C-c\C-ei" 'epa-mail-import-keys)
+    (define-key keymap "\C-c\C-eo" 'epa-insert-keys)
     keymap))
 
 ;;;###autoload