From: morioka <morioka>
Date: Tue, 7 Jul 1998 15:55:04 +0000 (+0000)
Subject: (mime-visible-field-p): Renamed from `eword-visible-field-p'.
X-Git-Tag: chao-1_8-199811302358~8
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=505028567145a5dc5ccf3e17b1cf92c2b0215203;p=elisp%2Fflim.git

(mime-visible-field-p): Renamed from `eword-visible-field-p'.
---

diff --git a/mmbuffer.el b/mmbuffer.el
index e485784..c5c3fa8 100644
--- a/mmbuffer.el
+++ b/mmbuffer.el
@@ -81,7 +81,7 @@
 			    filename)
     ))
 
-(defun eword-visible-field-p (field-name visible-fields invisible-fields)
+(defun mime-visible-field-p (field-name visible-fields invisible-fields)
   (or (catch 'found
 	(while visible-fields
 	  (let ((regexp (car visible-fields)))
@@ -120,8 +120,8 @@
 		  field-name (buffer-substring beg (1- p))
 		  len (string-width field-name)
 		  end (std11-field-end))
-	    (when (eword-visible-field-p field-name
-					 visible-fields invisible-fields)
+	    (when (mime-visible-field-p field-name
+					visible-fields invisible-fields)
 	      (setq field (intern (capitalize field-name)))
 	      (save-excursion
 		(set-buffer the-buf)