[Emacs-commit] emacs/lisp/mh-e mh-folder.el

[Jeffrey C Honig]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Jeffrey C Honig <jchonig>       07/08/21 12:15:22

Modified files:
        lisp/mh-e      : mh-folder.el 

Log message:
        (mh-folder-message-menu, mh-folder-mode-map): Add
        folder mode support for mh-show-preferred-alternative.  (Clooses
        SF 1777321).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mh-e/mh-folder.el?cvsroot=emacs&r1=1.16&r2=1.17

Patches:
Index: mh-folder.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mh-e/mh-folder.el,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- mh-folder.el        13 Aug 2007 13:41:24 -0000      1.16
+++ mh-folder.el        21 Aug 2007 12:15:22 -0000      1.17
@@ -156,6 +156,8 @@
   '("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 @@
   "'"           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