From 5c26f587b16801ba85892e61bbb754a4fce82f4b Mon Sep 17 00:00:00 2001 From: morioka Date: Sun, 15 Mar 1998 13:36:18 +0000 Subject: [PATCH] (mime-view-entity-button-function): Use `mime-root-entity-p'. --- mime-view.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mime-view.el b/mime-view.el index 8d5206c..05d6b42 100644 --- a/mime-view.el +++ b/mime-view.el @@ -159,7 +159,7 @@ Please redefine this function if you want to change default setting." (let ((entity-node-id (mime-entity-node-id entity)) (media-type (mime-entity-media-type entity)) (media-subtype (mime-entity-media-subtype entity))) - (or (null entity-node-id) + (or (mime-root-entity-p entity) (and (eq media-type 'application) (or (eq media-subtype 'x-selection) (and (eq media-subtype 'octet-stream) -- 1.7.10.4