OSDN Git Service

Fixed keymap.
authorDaiki Ueno <ueno@unixuser.org>
Mon, 29 Jan 2007 03:49:55 +0000 (03:49 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Mon, 29 Jan 2007 03:49:55 +0000 (03:49 +0000)
epa-mail.el

index aadb743..647d8e6 100644 (file)
 
 (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 " epa-mail " epa-mail-mode-map)
+  nil " epa-mail" epa-mail-mode-map)
 
 ;;;###autoload
 (defun epa-mail-decrypt ()