From 0ba0d1c08a6c1941ec4d49026104a5c25bf6bd77 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 17 Mar 1997 12:50:46 +0000 Subject: [PATCH] `mime-preview/insert-content-button' -> `mime-view-insert-entity-button'. --- mime-view.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/mime-view.el b/mime-view.el index 193b627..e9cb3a2 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.38 $ +;; Version: $Revision: 0.39 $ ;; 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.38 1997-03-17 12:44:38 morioka Exp $") + "$Id: mime-view.el,v 0.39 1997-03-17 12:50:46 morioka Exp $") (defconst mime-view-version (get-version-string mime-view-RCS-ID)) @@ -233,7 +233,7 @@ Each elements are regexp of field-name. [mime-view.el]") ;;; @@ content button ;;; -(defun mime-preview/insert-content-button +(defun mime-view-insert-entity-button (rcnum cinfo ctype params subj encoding) (save-restriction (narrow-to-region (point)(point)) @@ -287,7 +287,7 @@ Each elements are regexp of field-name. [mime-view.el]") (not (member ctype mime-view-content-button-ignored-ctype-list))) - (mime-preview/insert-content-button + (mime-view-insert-entity-button rcnum cinfo ctype params subj encoding) )) @@ -531,7 +531,7 @@ The compressed face will be piped to this command.") ctype mime-view-content-button-visible-ctype-list)) (save-excursion (goto-char (point-max)) - (mime-preview/insert-content-button + (mime-view-insert-entity-button rcnum cinfo ctype params subj encoding) )) (cond ((mime-view-body-visible-p rcnum cinfo ctype) @@ -545,7 +545,7 @@ The compressed face will be piped to this command.") (null (mime::content-info/children cinfo)) ) (goto-char (point-max)) - (mime-preview/insert-content-button + (mime-view-insert-entity-button rcnum cinfo ctype params subj encoding) )) (mime-preview/default-content-separator rcnum cinfo ctype params subj) -- 1.7.10.4