;; Created: 1994/7/13
;; Renamed: 1994/8/31 from tm-body.el
;; Renamed: 1997/02/19 from tm-view.el
-;; Version: $Revision: 0.42 $
+;; Version: $Revision: 0.43 $
;; Keywords: MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;;;
(defconst mime-view-RCS-ID
- "$Id: mime-view.el,v 0.42 1997-03-17 13:32:52 morioka Exp $")
+ "$Id: mime-view.el,v 0.43 1997-03-17 13:35:07 morioka Exp $")
(defconst mime-view-version (get-version-string mime-view-RCS-ID))
"*List of media-types to be able to display in MIME-View buffer.
Each elements are string of TYPE/SUBTYPE, e.g. \"text/plain\".")
-(defvar mime-view-content-button-ignored-ctype-list
- '("application/x-selection"))
-
(defvar mime-view-content-button-visible-ctype-list
'("application/pgp"))
(rcnum cinfo ctype params subj encoding)
"Insert entity button conditionally."
(if (and (consp rcnum)
- (not (member
- ctype
- mime-view-content-button-ignored-ctype-list)))
- (mime-view-insert-entity-button
- rcnum cinfo ctype params subj encoding)
+ (not (string= ctype "application/x-selection"))
+ )
+ (mime-view-insert-entity-button rcnum cinfo ctype params subj encoding)
))