X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=epa-mail.el;h=647d8e6e988f88b1269c41be4ca4532f2ab90fa8;hb=97bc3878bde310e3418d1e0b398df9a5312eacbf;hp=d44371e4f670945be6325b4eb162cae007ec85d1;hpb=c8f3240fa9d2f3b55c163958a7711d7c8e77b154;p=elisp%2Fepg.git

diff --git a/epa-mail.el b/epa-mail.el
index d44371e..647d8e6 100644
--- a/epa-mail.el
+++ b/epa-mail.el
@@ -28,18 +28,18 @@
 
 (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
 (define-minor-mode epa-mail-mode
   "A minor-mode for composing encrypted/clearsigned mails."
-  nil nil epa-mail-mode-map)
+  nil " epa-mail" epa-mail-mode-map)
 
 ;;;###autoload
 (defun epa-mail-decrypt ()