unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Revoked key (lisp/epa.el)
@ 2023-11-21  2:31 CHENG Gao via Emacs development discussions.
  2023-12-25 15:06 ` Stefan Kangas
  0 siblings, 1 reply; 2+ messages in thread
From: CHENG Gao via Emacs development discussions. @ 2023-11-21  2:31 UTC (permalink / raw)
  To: emacs-devel


In lisp/epa.el, epa-list-keys should add status for revoked key as

r revoked key.

,----
| ;;;###autoload
| (defun epa-list-keys (&optional name)
|   "List all keys matched with NAME from the public keyring."
|   (interactive
|    (if current-prefix-arg
|        (let ((name (read-string "Pattern: "
| 				(if epa-list-keys-arguments
| 				    (car epa-list-keys-arguments)))))
| 	 (list (if (equal name "") nil name)))
|      (list nil)))
|   (epa--list-keys name nil
|                   "The letters at the start of a line have these meanings.
| e  expired key.  n  never trust.  m  trust marginally.  u  trust ultimately.
| f  trust fully (keys you have signed, usually).
| q  trust status questionable.  -  trust status unspecified.
|  See GPG documentation for more explanation.
| \n"))
`----




^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: Revoked key (lisp/epa.el)
  2023-11-21  2:31 Revoked key (lisp/epa.el) CHENG Gao via Emacs development discussions.
@ 2023-12-25 15:06 ` Stefan Kangas
  0 siblings, 0 replies; 2+ messages in thread
From: Stefan Kangas @ 2023-12-25 15:06 UTC (permalink / raw)
  To: CHENG Gao, emacs-devel

CHENG Gao via "Emacs development discussions." <emacs-devel@gnu.org>
writes:

> In lisp/epa.el, epa-list-keys should add status for revoked key as
>
> r revoked key.
>
> ,----
> | ;;;###autoload
> | (defun epa-list-keys (&optional name)
> |   "List all keys matched with NAME from the public keyring."
> |   (interactive
> |    (if current-prefix-arg
> |        (let ((name (read-string "Pattern: "
> | 				(if epa-list-keys-arguments
> | 				    (car epa-list-keys-arguments)))))
> | 	 (list (if (equal name "") nil name)))
> |      (list nil)))
> |   (epa--list-keys name nil
> |                   "The letters at the start of a line have these meanings.
> | e  expired key.  n  never trust.  m  trust marginally.  u  trust ultimately.
> | f  trust fully (keys you have signed, usually).
> | q  trust status questionable.  -  trust status unspecified.
> |  See GPG documentation for more explanation.
> | \n"))
> `----

Thanks, done on emacs-29.



^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2023-12-25 15:06 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2023-11-21  2:31 Revoked key (lisp/epa.el) CHENG Gao via Emacs development discussions.
2023-12-25 15:06 ` Stefan Kangas

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).