From 19c35c57186c38455004452626d597239f667a55 Mon Sep 17 00:00:00 2001 From: Jeffrey C Honig Date: Tue, 21 Aug 2007 12:15:37 +0000 Subject: [PATCH] (mh-folder-message-menu, mh-folder-mode-map): Add folder mode support for mh-show-preferred-alternative. (Clooses SF 1777321). --- lisp/mh-e/ChangeLog | 11 +++++++++++ lisp/mh-e/mh-folder.el | 3 +++ 2 files changed, 14 insertions(+) diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index b4b7b8ad18d..4e25ce1a086 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog @@ -1,5 +1,16 @@ 2007-08-21 Jeffrey C Honig + * mh-folder.el (mh-folder-message-menu, mh-folder-mode-map): Add + folder mode support for mh-show-preferred-alternative. (Clooses + SF 1777321). + + * mh-show.el (mh-show-preferred-alternative) + (mh-show-write-message-to-file, mh-show-message-menu) + (mh-show-mode-map): Add mh-show-preferred-alternative (bound to + ":") which will show the message's preferred alternative + overriding the users configured preference. Useful for showing + HTML when text content is lacking. (Closses SF 1777321). + * mh-e.el: (mh-invisible-header-fields-internal): Exclude Fax and Phone. Put known exclusions as comments before the list and move parens to diff --git a/lisp/mh-e/mh-folder.el b/lisp/mh-e/mh-folder.el index 42abad4536a..75cebfe519d 100644 --- a/lisp/mh-e/mh-folder.el +++ b/lisp/mh-e/mh-folder.el @@ -156,6 +156,8 @@ annotation.") '("Message" ["Show Message" mh-show (mh-get-msg-num nil)] ["Show Message with Header" mh-header-display (mh-get-msg-num nil)] + ["Show Message with Preferred Alternative" + mh-show-preferred-alternative (mh-get-msg-num nil)] ["Next Message" mh-next-undeleted-msg t] ["Previous Message" mh-previous-undeleted-msg t] ["Go to First Message" mh-first-msg t] @@ -225,6 +227,7 @@ annotation.") "'" mh-toggle-tick "," mh-header-display "." mh-alt-show + ":" mh-show-preferred-alternative ";" mh-toggle-mh-decode-mime-flag ">" mh-write-msg-to-file "?" mh-help -- 2.39.2