From: morioka <morioka>
Date: Tue, 7 Jul 1998 15:28:04 +0000 (+0000)
Subject: (entity-point-min): Renamed from `point-min'.
X-Git-Tag: chao-1_8-199811302358~13
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d52dc852fca23b2cb2946ecb65a13ffc81e72a79;p=elisp%2Fflim.git

(entity-point-min): Renamed from `point-min'.
(entity-point-max): Renamed from `point-max'.
(entity-cooked-p): Renamed from `cooked-p'.
(entity-content): Renamed from `get-content'.
(write-entity-content): Renamed from `write-content'.
(write-entity): Renamed from `write-with-header'.
(write-entity-body): Renamed from `write-body'.
---

diff --git a/mmbuffer.el b/mmbuffer.el
index 3d423e1..e485784 100644
--- a/mmbuffer.el
+++ b/mmbuffer.el
@@ -31,10 +31,10 @@
 (mm-define-method open ((nil buffer) location)
   (mime-parse-buffer location))
 
-(mm-define-method point-min ((entity buffer))
+(mm-define-method entity-point-min ((entity buffer))
   (mime-entity-header-start-internal entity))
 
-(mm-define-method point-max ((entity buffer))
+(mm-define-method entity-point-max ((entity buffer))
   (mime-entity-body-end-internal entity))
 
 (mm-define-method fetch-field ((entity buffer) field-name)
@@ -46,9 +46,9 @@
       (std11-fetch-field field-name)
       )))
 
-(mm-define-method cooked-p ((entity buffer)) nil)
+(mm-define-method entity-cooked-p ((entity buffer)) nil)
 
-(mm-define-method get-content ((entity buffer))
+(mm-define-method entity-content ((entity buffer))
   (save-excursion
     (set-buffer (mime-entity-buffer-internal entity))
     (mime-decode-string
@@ -56,7 +56,7 @@
 		       (mime-entity-body-end-internal entity))
      (mime-entity-encoding entity))))
 
-(mm-define-method write-content ((entity buffer) filename)
+(mm-define-method write-entity-content ((entity buffer) filename)
   (save-excursion
     (set-buffer (mime-entity-buffer-internal entity))
     (mime-write-decoded-region (mime-entity-body-start-internal entity)
@@ -65,7 +65,7 @@
 			       (or (mime-entity-encoding entity) "7bit"))
     ))
 
-(mm-define-method write-with-header ((entity buffer) filename)
+(mm-define-method write-entity ((entity buffer) filename)
   (save-excursion
     (set-buffer (mime-entity-buffer-internal entity))
     (write-region-as-binary (mime-entity-header-start-internal entity)
@@ -73,7 +73,7 @@
 			    filename)
     ))
 
-(mm-define-method write-body ((entity buffer) filename)
+(mm-define-method write-entity-body ((entity buffer) filename)
   (save-excursion
     (set-buffer (mime-entity-buffer-internal entity))
     (write-region-as-binary (mime-entity-body-start-internal entity)