From: morioka <morioka>
Date: Tue, 18 Mar 1997 12:52:39 +0000 (+0000)
Subject: `mime-partial/preview-article' -> `mime-view-partial-message'.
X-Git-Tag: Hokutetsu-Ishikawa-new~54
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b175df8cf8de887a7435f1ad73fb4a489649f252;p=elisp%2Fsemi.git

`mime-partial/preview-article' -> `mime-view-partial-message'.
---

diff --git a/mime-partial.el b/mime-partial.el
index 8e6250b..dc2c4ff 100644
--- a/mime-partial.el
+++ b/mime-partial.el
@@ -5,7 +5,7 @@
 ;; Author: OKABE Yasuo @ Kyoto University
 ;;         MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Version:
-;;	$Id: mime-partial.el,v 0.5 1997-03-18 12:46:59 morioka Exp $ 
+;;	$Id: mime-partial.el,v 0.6 1997-03-18 12:52:39 morioka Exp $ 
 ;; Keywords: message/partial, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -34,7 +34,7 @@
   "Alist major-mode vs. function to view partial message for mime-partial.")
 
 ;; display Article at the cursor in Subject buffer.
-(defsubst mime-partial/preview-article (target)
+(defsubst mime-view-partial-message (target)
   (save-window-excursion
     (let ((f (assq target mime-view-partial-message-method-alist)))
       (if f
@@ -74,7 +74,7 @@
 	  (while (search-backward subject-id nil t))
 	  (catch 'tag
 	    (while t
-	      (mime-partial/preview-article target)
+	      (mime-view-partial-message target)
 	      (set-buffer article-buffer)
 	      (set-buffer mime::article/preview-buffer)
 	      (setq cinfo