X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-show.el;h=acaef8ef2afd3871b071e468025fec44ab9f124c;hb=3901bbca2eb3f24dd8ffa628a2c057ec1a28a1d0;hp=1864dd15a05bb8b24c2255806c9e383d9f5f6e31;hpb=c34effad9a65c2f2c6d4d25c508c201bad7a07f6;p=notmuch

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 1864dd15..acaef8ef 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -469,7 +469,8 @@ message at DEPTH in the current thread."
   'action 'notmuch-show-part-button-default
   'keymap 'notmuch-show-part-button-map
   'follow-link t
-  'face 'message-mml)
+  'face 'message-mml
+  :supertype 'notmuch-button-type)
 
 (defvar notmuch-show-part-button-map
   (let ((map (make-sparse-keymap)))
@@ -1085,6 +1086,7 @@ buttons for a corresponding notmuch search."
 	;; Remove the overlay created by goto-address-mode
 	(remove-overlays (first link) (second link) 'goto-address t)
 	(make-text-button (first link) (second link)
+			  :type 'notmuch-button-type
 			  'action `(lambda (arg)
 				     (notmuch-show ,(third link)))
 			  'follow-link t