aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Edmondson <dme@dme.org>2016-02-09 12:23:49 +0000
committerDavid Bremner <david@tethera.net>2016-03-24 07:58:52 -0300
commit3b63856568a8b0153801386fcc2030b228a5f99d (patch)
tree8b864ad602b4f8a301ef4599b40252cfe73e7f49
parent4900cbee08fbcfd169308cba472929a5eef2bd79 (diff)
emacs: Improve crypto button labels.
Make the labels for both encryption and signature buttons share a common format, in which both report the status if it is not one of those known.
-rw-r--r--emacs/notmuch-crypto.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/emacs/notmuch-crypto.el b/emacs/notmuch-crypto.el
index 52338249..73ebf51d 100644
--- a/emacs/notmuch-crypto.el
+++ b/emacs/notmuch-crypto.el
@@ -110,8 +110,8 @@ mode."
(setq label (concat "Bad signature (claimed key ID " keyid ")"))
(setq face 'notmuch-crypto-signature-bad)))
(t
- (setq label "Unknown signature status")
- (if status (setq label (concat label " \"" status "\"")))))
+ (setq label (concat "Unknown signature status"
+ (if status (concat ": " status))))))
(insert-button
(concat "[ " label " ]")
:type 'notmuch-crypto-status-button-type
@@ -161,7 +161,8 @@ mode."
((string= status "bad")
(setq label "Decryption error"))
(t
- (setq label (concat "Unknown encstatus \"" status "\""))))
+ (setq label (concat "Unknown encryption status"
+ (if status (concat ": " status))))))
(insert-button
(concat "[ " label " ]")
:type 'notmuch-crypto-status-button-type