comparison lisp/mh-e/mh-folder.el @ 82497:c490a6236b89

(mh-folder-message-menu, mh-folder-mode-map): Add folder mode support for mh-show-preferred-alternative. (Clooses SF 1777321).
author Jeffrey C Honig <jch@bsdi.com>
date Tue, 21 Aug 2007 12:15:22 +0000
parents 40ee7ed1bfea
children 794e428cd497
comparison
equal deleted inserted replaced
82496:79a51974e5fc 82497:c490a6236b89
154 (easy-menu-define 154 (easy-menu-define
155 mh-folder-message-menu mh-folder-mode-map "Menu for MH-E folder-message." 155 mh-folder-message-menu mh-folder-mode-map "Menu for MH-E folder-message."
156 '("Message" 156 '("Message"
157 ["Show Message" mh-show (mh-get-msg-num nil)] 157 ["Show Message" mh-show (mh-get-msg-num nil)]
158 ["Show Message with Header" mh-header-display (mh-get-msg-num nil)] 158 ["Show Message with Header" mh-header-display (mh-get-msg-num nil)]
159 ["Show Message with Preferred Alternative"
160 mh-show-preferred-alternative (mh-get-msg-num nil)]
159 ["Next Message" mh-next-undeleted-msg t] 161 ["Next Message" mh-next-undeleted-msg t]
160 ["Previous Message" mh-previous-undeleted-msg t] 162 ["Previous Message" mh-previous-undeleted-msg t]
161 ["Go to First Message" mh-first-msg t] 163 ["Go to First Message" mh-first-msg t]
162 ["Go to Last Message" mh-last-msg t] 164 ["Go to Last Message" mh-last-msg t]
163 ["Go to Message by Number..." mh-goto-msg t] 165 ["Go to Message by Number..." mh-goto-msg t]
223 " " mh-page-msg 225 " " mh-page-msg
224 "!" mh-refile-or-write-again 226 "!" mh-refile-or-write-again
225 "'" mh-toggle-tick 227 "'" mh-toggle-tick
226 "," mh-header-display 228 "," mh-header-display
227 "." mh-alt-show 229 "." mh-alt-show
230 ":" mh-show-preferred-alternative
228 ";" mh-toggle-mh-decode-mime-flag 231 ";" mh-toggle-mh-decode-mime-flag
229 ">" mh-write-msg-to-file 232 ">" mh-write-msg-to-file
230 "?" mh-help 233 "?" mh-help
231 "E" mh-extract-rejected-mail 234 "E" mh-extract-rejected-mail
232 "M" mh-modify 235 "M" mh-modify