From: morioka Date: Fri, 5 Sep 1997 12:56:51 +0000 (+0000) Subject: (mime-view-display-entity): Use `media-type' and `media-subtype' X-Git-Tag: semi-0_112~7 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7aaea09b91dcdc117581fad8cd22908bd7f3d8a3;p=elisp%2Fsemi.git (mime-view-display-entity): Use `media-type' and `media-subtype' instead of `ctype' to compare with message/partial. --- diff --git a/mime-view.el b/mime-view.el index 0a12f4f..da0cfe4 100644 --- a/mime-view.el +++ b/mime-view.el @@ -6,7 +6,7 @@ ;; Created: 1994/7/13 ;; Renamed: 1994/8/31 from tm-body.el ;; Renamed: 1997/02/19 from tm-view.el -;; Version: $Revision: 0.109 $ +;; Version: $Revision: 0.110 $ ;; Keywords: MIME, multimedia, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -40,7 +40,7 @@ ;;; (defconst mime-view-RCS-ID - "$Id: mime-view.el,v 0.109 1997-09-05 12:52:11 morioka Exp $") + "$Id: mime-view.el,v 0.110 1997-09-05 12:56:51 morioka Exp $") (defconst mime-view-version `,(get-version-string mime-view-RCS-ID)) @@ -548,7 +548,7 @@ The compressed face will be piped to this command.") (mime-view-display-body he end rcnum cinfo ctype params subj encoding) ) - ((equal ctype "message/partial") + ((and (eq media-type 'message)(eq media-subtype 'partial)) (mime-view-insert-message/partial-button) ) ((and (null rcnum)