From: morioka <morioka>
Date: Fri, 5 Jun 1998 05:01:54 +0000 (+0000)
Subject: (mime-view-display-entity): Display entity-button in body if button is
X-Git-Tag: semi-1_5_1~11
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ae502d8e2e41a8fac6fb18ceb21bedacd6864715;p=elisp%2Fsemi.git

(mime-view-display-entity): Display entity-button in body if button is
invisible and body-presentation-method is not found.
---

diff --git a/mime-view.el b/mime-view.el
index 24a5c70..9f7ac03 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -793,13 +793,18 @@ The compressed face will be piped to this command.")
 		 )))
 	    ((functionp body-presentation-method)
 	     (funcall body-presentation-method entity situation)
+	     )
+	    (t
+	     (when button-is-invisible
+	       (goto-char (point-max))
+	       (mime-view-insert-entity-button entity message-info subj)
+	       )
+	     (or header-is-visible
+		 (progn
+		   (goto-char (point-max))
+		   (insert "\n")
+		   ))
 	     ))
-      (or header-is-visible
-	  body-presentation-method
-	  (progn
-	    (goto-char (point-max))
-	    (insert "\n")
-	    ))
       (setq ne (point-max))
       (widen)
       (put-text-property nb ne 'mime-view-raw-buffer ibuf)