From: morioka Date: Thu, 4 Sep 1997 11:10:14 +0000 (+0000) Subject: Rename `mime-preview/display-header' -> `mime-view-display-header'. X-Git-Tag: semi-0_112~44 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4605b250bfaf4d1e02b8f2624a655e4dd0057a9b;p=elisp%2Fsemi.git Rename `mime-preview/display-header' -> `mime-view-display-header'. --- diff --git a/mime-view.el b/mime-view.el index bbd01a3..477e7af 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.97 $ +;; Version: $Revision: 0.98 $ ;; 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.97 1997-07-14 15:15:17 morioka Exp $") + "$Id: mime-view.el,v 0.98 1997-09-04 11:10:14 morioka Exp $") (defconst mime-view-version `,(get-version-string mime-view-RCS-ID)) @@ -524,7 +524,7 @@ The compressed face will be piped to this command.") (narrow-to-region nb nb) (mime-view-entity-button-function rcnum cinfo ctype params subj encoding) (if (mime-view-header-visible-p rcnum cinfo) - (mime-preview/display-header beg he) + (mime-view-display-header beg he) ) (if (and (null rcnum) (member @@ -556,7 +556,7 @@ The compressed face will be piped to this command.") (goto-char ne) )) -(defun mime-preview/display-header (beg end) +(defun mime-view-display-header (beg end) (save-restriction (narrow-to-region (point)(point)) (insert-buffer-substring mime-raw-buffer beg end)