From: morioka <morioka>
Date: Fri, 13 Mar 1998 16:57:15 +0000 (+0000)
Subject: Rename `mime-raw-point-content-number' ->
X-Git-Tag: semi-1_1_0~85
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e9f6922c2d82e533e039aa976dfbe7d432a957ab;p=elisp%2Fsemi.git

Rename `mime-raw-point-content-number' ->
`mime-raw-point-to-entity-number'.
---

diff --git a/mime-view.el b/mime-view.el
index d2f43cf..1856645 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -577,7 +577,7 @@ The compressed face will be piped to this command.")
 ;;; @ entity information
 ;;;
 
-(defun mime-raw-point-content-number (p &optional cinfo)
+(defun mime-raw-point-to-entity-number (p &optional cinfo)
   (or cinfo
       (setq cinfo mime-raw-entity-info)
       )
@@ -590,7 +590,7 @@ The compressed face will be piped to this command.")
 	      (catch 'tag
 		(while c
 		  (setq co (car c))
-		  (setq ret (mime-raw-point-content-number p co))
+		  (setq ret (mime-raw-point-to-entity-number p co))
 		  (cond ((eq ret t) (throw 'tag (list sn)))
 			(ret (throw 'tag (cons sn ret)))
 			)