From: ueno <ueno>
Date: Sat, 24 Mar 2007 09:29:21 +0000 (+0000)
Subject: Don't use epa-list-keys-arguments.
X-Git-Tag: epg-0_0_11~23
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=741cd9e39bc6f55ce7618672ae75b8b0a7654dd7;p=elisp%2Fepg.git

Don't use epa-list-keys-arguments.
---

diff --git a/epa.el b/epa.el
index fe46903..45f1959 100644
--- 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 ()