From 5b7055b463ae13c677beb02b737a7f8f139caee0 Mon Sep 17 00:00:00 2001 From: morioka Date: Tue, 16 Jun 1998 20:44:54 +0000 Subject: [PATCH] (mime-display-multipart/alternative): Renamed from `mime-preview-multipart/alternative'. --- mime-view.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mime-view.el b/mime-view.el index cb3a03e..f6746fb 100644 --- a/mime-view.el +++ b/mime-view.el @@ -493,7 +493,7 @@ Each elements are regexp of field-name.") 'mime-preview-condition '((type . multipart)(subtype . alternative) (body . visible) - (body-presentation-method . mime-preview-multipart/alternative))) + (body-presentation-method . mime-display-multipart/alternative))) (ctree-set-calist-strictly 'mime-preview-condition '((type . message)(subtype . partial) @@ -568,7 +568,7 @@ MEDIA-TYPE must be (TYPE . SUBTYPE), TYPE or t. t means default." (item :tag "Default" t)) integer))) -(defun mime-preview-multipart/alternative (entity situation) +(defun mime-display-multipart/alternative (entity situation) (let* ((children (mime-entity-children entity)) (default-situation (cdr (assq 'childrens-situation situation))) -- 1.7.10.4