From: morioka Date: Tue, 9 Jun 1998 16:45:13 +0000 (+0000) Subject: rearrangement. X-Git-Tag: semi-1_5_4_9~5 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c0e430ceaa37ffb494bf69204fa5936a2434015d;p=elisp%2Fsemi.git rearrangement. --- diff --git a/mime-view.el b/mime-view.el index 9bc3262..8c7fb6d 100644 --- a/mime-view.el +++ b/mime-view.el @@ -189,18 +189,6 @@ If optional argument MESSAGE-INFO is not specified, (setq children (cdr children))) message-info)))) -(defsubst mime-raw-point-to-entity-node-id (point &optional message-info) - "Return entity-node-id from POINT in mime-raw-buffer. -If optional argument MESSAGE-INFO is not specified, -`mime-raw-message-info' is used." - (mime-entity-node-id (mime-raw-find-entity-from-point point message-info))) - -(defsubst mime-raw-point-to-entity-number (point &optional message-info) - "Return entity-number from POINT in mime-raw-buffer. -If optional argument MESSAGE-INFO is not specified, -`mime-raw-message-info' is used." - (reverse (mime-raw-point-to-entity-node-id point message-info))) - (defsubst mime-entity-parent (entity &optional message-info) "Return mother entity of ENTITY. If optional argument MESSAGE-INFO is not specified, @@ -212,6 +200,18 @@ If optional argument MESSAGE-INFO is not specified, (set-buffer (mime-entity-buffer entity)) mime-raw-message-info)))) +(defsubst mime-raw-point-to-entity-node-id (point &optional message-info) + "Return entity-node-id from POINT in mime-raw-buffer. +If optional argument MESSAGE-INFO is not specified, +`mime-raw-message-info' is used." + (mime-entity-node-id (mime-raw-find-entity-from-point point message-info))) + +(defsubst mime-raw-point-to-entity-number (point &optional message-info) + "Return entity-number from POINT in mime-raw-buffer. +If optional argument MESSAGE-INFO is not specified, +`mime-raw-message-info' is used." + (mime-entity-number (mime-raw-find-entity-from-point point message-info))) + (defun mime-raw-flatten-message-info (&optional message-info) "Return list of entity in mime-raw-buffer. If optional argument MESSAGE-INFO is not specified,