From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 18 Jan 2021 16:35:55 +0000 (+0100)
Subject: Don't double up keys in epa--list-keys
X-Git-Tag: emacs-28.0.90~4235^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f9dab612726148919812ec4ff804df6120022407;p=emacs.git

Don't double up keys in epa--list-keys

* lisp/epa.el (epa--list-keys): Delete the list keys before
redisplaying (bug#44134).
---

diff --git a/lisp/epa.el b/lisp/epa.el
index e909b1d8698..197cd92f977 100644
--- a/lisp/epa.el
+++ b/lisp/epa.el
@@ -374,7 +374,7 @@ DOC is documentation text to insert at the start."
     ;; Now delete the key description text, if any.
     (when point
       (delete-region point
-		     (or (next-single-property-change point 'epa-key)
+		     (or (next-single-property-change point 'epa-list-keys)
 			 (point-max)))
       (goto-char point))