From: yamaoka <yamaoka>
Date: Tue, 5 Nov 2002 14:53:45 +0000 (+0000)
Subject: Synch with the semi-1_14 branch.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3532faa7c8db1d613cd7605ce8eb92f7e9953554;p=elisp%2Fsemi.git

Synch with the semi-1_14 branch.
---

diff --git a/ChangeLog b/ChangeLog
index 6eaab4c..3454c23 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-11-05  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+	* mime-view.el (mime-preview-find-boundary-info): Change the name of
+	the argument from get-mother to with-children along its effect.
+
 2002-11-03  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* mime-edit.el (mime-edit-decode-single-part-in-buffer): Decode text
diff --git a/mime-view.el b/mime-view.el
index 7dca53f..ac6acb5 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -1473,9 +1473,9 @@ button-2	Move to point under the mouse cursor
 ;;; @@ utility
 ;;;
 
-(defun mime-preview-find-boundary-info (&optional get-mother)
+(defun mime-preview-find-boundary-info (&optional with-children)
   "Return boundary information of current part.
-If GET-MOTHER, refer boundary surrounding current part and its branches."
+If WITH-CHILDREN, refer boundary surrounding current part and its branches."
   (let (entity
 	p-beg p-end
 	entity-node-id len)
@@ -1504,7 +1504,7 @@ If GET-MOTHER, refer boundary surrounding current part and its branches."
 	  ((null entity-node-id)
 	   (setq p-end (point-max))
 	   )
-	  (get-mother
+	  (with-children
 	   (save-excursion
 	     (catch 'tag
 	       (let (e i)