OSDN Git Service

Don't use epa-list-keys-arguments.
authorDaiki Ueno <ueno@unixuser.org>
Sat, 24 Mar 2007 09:29:21 +0000 (09:29 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sat, 24 Mar 2007 09:29:21 +0000 (09:29 +0000)
epa.el

diff --git a/epa.el b/epa.el
index fe46903..45f1959 100644 (file)
--- a/epa.el
+++ b/epa.el
@@ -186,7 +186,6 @@ the separate window."
     (define-key keymap "r" 'epa-delete-keys)
     (define-key keymap "i" 'epa-import-keys)
     (define-key keymap "o" 'epa-export-keys)
-    (define-key keymap "g" 'epa-list-keys)
     (define-key keymap "n" 'next-line)
     (define-key keymap "p" 'previous-line)
     (define-key keymap " " 'scroll-up)
@@ -389,7 +388,7 @@ If ARG is non-nil, mark the current line."
                                (if epa-list-keys-arguments
                                    (car epa-list-keys-arguments)))))
         (list (if (equal name "") nil name)))
-     (or epa-list-keys-arguments (list nil nil))))
+     (list nil)))
   (epa--list-keys name nil))
 
 ;;;###autoload
@@ -401,7 +400,7 @@ If ARG is non-nil, mark the current line."
                                (if epa-list-keys-arguments
                                    (car epa-list-keys-arguments)))))
         (list (if (equal name "") nil name)))
-     (or epa-list-keys-arguments (list nil nil))))
+     (list nil)))
   (epa--list-keys name t))
 
 (defun epa--marked-keys ()