>>>>> In [emacs-mime-ja : No.00825] >>>>> ari @ atesoft.advantest.co.jp (Akihiro Arisawa) wrote: 有沢さん> - (mime-entity-parent p)))) 有沢さん> + (mime-find-root-entity p)))) - (mime-entity-parent p)))) + (or (mime-entity-parent p) p)))) ではいけませんか? -- Katsumi Yamaoka <yamaoka @ jpl.org>