%PDF-
%PDF-
Mini Shell
Mini Shell
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302!\210\303\304\305\"\210\300\306!\210\300\307!\210\300\310!\210\300\311!\210\303\312\313\"\207" [require mh-e mh-scan autoload mh-tool-bar-init "mh-tool-bar" font-lock gnus-cite gnus-util goto-addr mh-make-buffer-data "mh-mime"] 3)
#@129 If non-nil, MH-Show buffer contains message with all header fields.
If nil, MH-Show buffer contains message processed normally.
(defvar mh-showing-with-headers nil (#$ . 673))
#@1060 Display message\<mh-folder-mode-map>.
If the message under the cursor is already displayed, this command
scrolls to the beginning of the message. MH-E normally hides a lot of
the superfluous header fields that mailers add to a message, but if
you wish to see all of them, use the command \[mh-header-display].
Two hooks can be used to control how messages are displayed. The
first hook, `mh-show-mode-hook', is called early on in the
process of the message display. It is usually used to perform
some action on the message's buffer. The second hook,
`mh-show-hook', is the last thing called after messages are
displayed. It's used to affect the behavior of MH-E in general or
when `mh-show-mode-hook' is too early.
From a program, optional argument MESSAGE can be used to display an
alternative message. The optional argument REDISPLAY-FLAG forces the
redisplay of the message even if the show buffer was already
displaying the correct message.
See the "mh-show" customization group for a litany of options that
control what displayed messages look like.
(defalias 'mh-show #[(&optional message redisplay-flag) "\204 \203 \n\204 \203 \305 \210\306\f!\207" [redisplay-flag mh-showing-with-headers mh-mhl-format-file mh-clean-message-header-flag message mh-invalidate-show-buffer mh-show-msg] 2 (#$ . 857) (list nil t)])
#@126 Display message with all header fields\<mh-folder-mode-map>.
Use the command \[mh-show] to show the message normally again.
(defalias 'mh-header-display #[nil "\204 \204\f \n\203 \306 \210\307\211\211\310\307!\210\311 \312
!\210\203) \313p!\210\314\216eb\210\315\316!\210*\317\211+\207" [mh-showing-with-headers mh-mhl-format-file mh-clean-message-header-flag mh-decode-mime-flag mh-in-show-buffer-saved-window mh-show-buffer mh-invalidate-show-buffer nil mh-show-msg selected-window switch-to-buffer-other-window bury-buffer #[nil "\301!\207" [mh-in-show-buffer-saved-window select-window] 2] mh-recenter 0 t mh-bury-show-buffer-flag] 3 (#$ . 2194) nil])
#@180 Display message with the default preferred alternative.
This is as if `mm-discouraged-alternatives' is set to nil.
Use the command \[mh-show] to show the message normally again.
(defalias 'mh-show-preferred-alternative #[nil "\301\302\301\303\")\207" [mm-discouraged-alternatives nil mh-show t] 3 (#$ . 2870) nil])
#@116 Display message at cursor, but only if in show mode.
If optional arg MSG is non-nil, display that message instead.
(defalias 'mh-maybe-show #[(&optional msg) "\205 \302 !\207" [mh-showing-mode msg mh-show] 2 (#$ . 3194)])
#@84 Show MSG.
The hook `mh-show-hook' is called after the message has been
displayed.
(defalias 'mh-show-msg #[(msg) "\204 \306\307!\310\307!\210\311\n\211C \312\f!
# $ % & '\313\314 !\315 =\204- \316 \210\315 (\317\f!\210)\203> \320p!\210\321\216#$\203a \322'\"*\232\203a eb\210%\204g \323 \210\202g \324'\"\210*\325 \204z \326\327 \206w \330 Z!\210\331\311!\210\332\311\211+#\210,>\204\222 ,B,-\203\267 \333 \210.\203\253 \334\335/C\"&\"&\336 \203\267 \337\340\307&#\210\341\342!-\207" [msg mh-page-to-next-msg-flag mh-current-folder mh-clean-message-header-flag mh-show-buffer mh-display-buttons-for-inline-parts-flag mh-get-msg-num t mh-showing-mode nil get-buffer-window next-window minibuffer-window selected-window delete-other-windows switch-to-buffer-other-window bury-buffer #[nil "\301!\207" [mh-in-show-buffer-saved-window select-window] 2] mh-msg-filename mh-start-of-uncleaned-message mh-display-msg mh-window-full-height-p shrink-window window-height mh-summary-height mh-recenter mh-notate mh-update-sequences append mh-index-delete-from-sequence mh-speed-flists-active-p apply mh-speed-flists run-hooks mh-show-hook display-mime-buttons-flag show-window clean-message-header folders folder mh-in-show-buffer-saved-window mh-bury-show-buffer-flag buffer-file-name mh-cmd-note mh-seen-list mh-update-sequences-after-mh-show-flag mh-index-data mh-unseen-seq] 5 (#$ . 3424)])
#@59 Position uninteresting headers off the top of the window.
(defalias 'mh-start-of-uncleaned-message #[nil "\301\302\303\304\301#\210\305 \210\306\307!)\207" [case-fold-search t re-search-forward "^To:\\|^Cc:\\|^From:\\|^Subject:\\|^Date:" nil beginning-of-line mh-recenter 0] 4 (#$ . 4848)])
#@136 Format string to produce `mode-line-buffer-identification' for show buffers.
First argument is folder name. Second is message number.
(defvar mh-show-buffer-mode-line-buffer-id " {show-%s} %d" (#$ . 5147))
#@77 Display MSG-NUM of FOLDER-NAME.
Sets the current buffer to the show buffer.
(defalias 'mh-display-msg #[(msg-num folder-name) "\306!\211q\210\307p\n\"\204 p\n \310 \311 \f#\210*
67\312\3138\"9: ; < = > ? @ A\314=!\204D \315\3168\"\210B\317V\203o \320=!\321\234BV\203o \322\323\3248\320=!\321\234B$!\204o \315\3258\"\210<q\210=C\232?\205G\326 \210\312D\327 \210\330 \210\331\332!\203\222 \333\332!\210\334\335!\210\336 \210A\203\263 \337\340\341\342A;\205\254 \343AD=%\210\202\270 \344=!\210E\203\330 A\204\330 \345 \210p F\n G\310F\311 G#\210*\346 \210\347 \210\350 \210\351 \210eb\210@\203\367 \352e?>#\210eb\210\202\372 \353 \210\354 \210H\355=\204\312H\356 \210=C\312I\357\360!\210\361\312!\210E\203)A\204)\362 \210\363 \210\364\312!\210\355D J\323K8#CL\365 \210 q\210\312\211M.\207" [folder-name folder mh-globals-hash #1=#:v #2=#:v mh-mhl-format-file mh-msg-folder gethash puthash mh-make-buffer-data nil mh-msg-filename file-exists-p error "Message %d does not exist" 0 file-attributes 7 y-or-n-p format "Message %d (%d bytes) exceeds %d bytes. Display it? " "Message %d not displayed" mh-unvisit-file mh-mime-cleanup erase-buffer boundp write-contents-hooks kill-local-variable font-lock-mode -1 mh-show-mode mh-exec-lib-cmd-output "mhl" "-nobell" "-noclear" "-form" insert-file-contents-literally mh-add-missing-mime-version-header mh-mime-display mh-show-unquote-From mh-show-xface mh-show-addr mh-clean-msg-header mh-start-of-uncleaned-message mh-decode-message-header t set-buffer-auto-saved auto-save-mode 1 set-mark mh-display-smileys mh-display-emphasis set-buffer-modified-p mh-logo-display mh-clean-message-header-flag mh-invisible-header-fields-compiled msg-num mh-show-buffer mh-mm-inline-media-tests mm-inline-media-tests show-buffer msg-filename visible-headers invisible-headers clean-message-header formfile mh-show-maximum-size buffer-file-name buffer-read-only mh-decode-mime-flag #3=#:v #4=#:v buffer-undo-list buffer-backed-up mh-show-folder-buffer mh-show-buffer-mode-line-buffer-id mode-line-buffer-identification mh-showing-with-headers] 8 (#$ . 5363)])
#@48 Return the name of the buffer for FOLDER-NAME.
(defalias 'mh-msg-folder #[(folder-name) "\207" [folder-name] 1 (#$ . 7507)])
#@338 Flush extraneous lines in message header.
Header is cleaned from START to the end of the message header.
INVISIBLE-HEADERS contains a regular expression specifying lines
to delete from the header. VISIBLE-HEADERS contains a regular
expression specifying the lines to display. INVISIBLE-HEADERS is
ignored if VISIBLE-HEADERS is non-nil.
(defalias 'mh-clean-msg-header #[(start invisible-headers visible-headers) "\306\307\214\nb\210\310\311\307\312#\203 \313u\210\n`}\210eb\210 \203J `dW\203f \314 !\2039 \315y\210\314\316!\203 \315y\210\202- \317\315!\210\314\316!\203 \317\315!\210\202= \320\f\307\306#\203f \321 \210\317\315!\210\314\316!\203J \317\315!\210\202Y )\307 \322 \210)\323 *\207" [buffer-read-only case-fold-search start visible-headers invisible-headers mh-compose-skipped-header-fields t nil search-forward "\n\n" move -1 looking-at 1 "[ ]" mh-delete-line re-search-forward beginning-of-line mh-letter-hide-all-skipped-fields unlock-buffer] 4 (#$ . 7640)])
#@60 Invalidate the show buffer so we must update it to use it.
(defalias 'mh-invalidate-show-buffer #[nil "\301!\205
rq\210\302 )\207" [mh-show-buffer get-buffer mh-unvisit-file] 2 (#$ . 8625)])
#@64 Separate current buffer from the message file it was visiting.
(defalias 'mh-unvisit-file #[nil "\301 \203 \203 \302\303\304\305!\"!\204 \306\307!\210\310 \210\311 \210\312\211\207" [buffer-file-name buffer-modified-p yes-or-no-p format "Message %s modified; discard changes? " file-name-nondirectory error "Changes preserved" clear-visited-file-modtime unlock-buffer nil] 5 (#$ . 8825)])
#@112 Return ideal value for the variable `mh-summary-height'.
The current frame height is taken into consideration.
(defalias 'mh-summary-height #[nil "\300\301!\203 \301 \302V\203 \303\301 \304\245^\206 \305\207" [fboundp frame-height 24 10 6 4] 3 (#$ . 9227)])
#@156 Define FUNCTION to run ORIGINAL-FUNCTION in folder buffer.
If the buffer we start in is still visible and DONT-RETURN is nil
then switch to it after that.
(defalias 'mh-defun-show-buffer '(macro . #[(function original-function &optional dont-return) "\303\304\305\306 \n\203 \307\202 \310 $\311\312\313\314\315\316\317\n?\205 \320BBB\321\322\323\324\325\326\327\300 DD\330BB\331\332\333\334\n\203; \335\202< \336E\257\257E\257\207" [function original-function dont-return defun nil format "Calls %s from the message's folder.\n%s\nSee `%s' for more info.\n" "" "When function completes, returns to the show buffer if it is\nstill visible.\n" (interactive) when (buffer-live-p (get-buffer mh-show-folder-buffer)) let (config (current-window-configuration)) (folder-buffer mh-show-folder-buffer) (normal-exit nil) ((cur-buffer-name (buffer-name))) (pop-to-buffer mh-show-folder-buffer nil) (unless (equal (buffer-name (window-buffer (frame-first-window (selected-frame)))) folder-buffer) (delete-other-windows)) (mh-goto-cur-msg t) (mh-funcall-if-exists deactivate-mark) unwind-protect prog1 call-interactively ((setq normal-exit t)) (mh-funcall-if-exists deactivate-mark) (when (eq major-mode 'mh-folder-mode) (mh-funcall-if-exists hl-line-highlight)) cond ((not normal-exit) (set-window-configuration config)) (t (setq mh-previous-window-config config)) ((and (get-buffer cur-buffer-name) (window-live-p (get-buffer-window (get-buffer cur-buffer-name)))) (pop-to-buffer (get-buffer cur-buffer-name) nil))] 20 (#$ . 9495)]))
#@185 Calls mh-previous-undeleted-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-previous-undeleted-msg' for more info.
(defalias 'mh-show-previous-undeleted-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-previous-undeleted-msg] 4 (#$ . 11033) nil])
#@177 Calls mh-next-undeleted-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-next-undeleted-msg' for more info.
(defalias 'mh-show-next-undeleted-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-next-undeleted-msg] 4 (#$ . 12035) nil])
#@149 Calls mh-quit from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-quit' for more info.
(defalias 'mh-show-quit #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-quit] 4 (#$ . 13021) nil])
#@161 Calls mh-delete-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-msg' for more info.
(defalias 'mh-show-delete-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-msg] 4 (#$ . 13951) nil])
#@161 Calls mh-refile-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-refile-msg' for more info.
(defalias 'mh-show-refile-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-refile-msg] 4 (#$ . 14905) nil])
#@149 Calls mh-undo from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-undo' for more info.
(defalias 'mh-show-undo #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-undo] 4 (#$ . 15859) nil])
#@173 Calls mh-execute-commands from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-execute-commands' for more info.
(defalias 'mh-show-execute-commands #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-execute-commands] 4 (#$ . 16789) nil])
#@75 Calls mh-reply from the message's folder.
See `mh-reply' for more info.
(defalias 'mh-show-reply #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-reply] 4 (#$ . 17766) nil])
#@165 Calls mh-redistribute from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-redistribute' for more info.
(defalias 'mh-show-redistribute #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-redistribute] 4 (#$ . 18509) nil])
#@79 Calls mh-forward from the message's folder.
See `mh-forward' for more info.
(defalias 'mh-show-forward #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-forward] 4 (#$ . 19470) nil])
#@169 Calls mh-header-display from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-header-display' for more info.
(defalias 'mh-show-header-display #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-header-display] 4 (#$ . 20221) nil])
#@183 Calls mh-refile-or-write-again from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-refile-or-write-again' for more info.
(defalias 'mh-show-refile-or-write-again #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-refile-or-write-again] 4 (#$ . 21191) nil])
#@149 Calls mh-show from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-show' for more info.
(defalias 'mh-show-show #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-show] 4 (#$ . 22189) nil])
#@193 Calls mh-show-preferred-alternative from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-show-preferred-alternative' for more info.
(defalias 'mh-show-show-preferred-alternative #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-show-preferred-alternative] 4 (#$ . 23119) nil])
#@175 Calls mh-write-msg-to-file from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-write-msg-to-file' for more info.
(defalias 'mh-show-write-message-to-file #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-write-msg-to-file] 4 (#$ . 24137) nil])
#@107 Calls mh-extract-rejected-mail from the message's folder.
See `mh-extract-rejected-mail' for more info.
(defalias 'mh-show-extract-rejected-mail #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-extract-rejected-mail] 4 (#$ . 25123) nil])
#@181 Calls mh-delete-msg-no-motion from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-msg-no-motion' for more info.
(defalias 'mh-show-delete-msg-no-motion #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-msg-no-motion] 4 (#$ . 25930) nil])
#@159 Calls mh-first-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-first-msg' for more info.
(defalias 'mh-show-first-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-first-msg] 4 (#$ . 26924) nil])
#@157 Calls mh-last-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-last-msg' for more info.
(defalias 'mh-show-last-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-last-msg] 4 (#$ . 27874) nil])
#@157 Calls mh-copy-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-copy-msg' for more info.
(defalias 'mh-show-copy-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-copy-msg] 4 (#$ . 28820) nil])
#@85 Calls mh-edit-again from the message's folder.
See `mh-edit-again' for more info.
(defalias 'mh-show-edit-again #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-edit-again] 4 (#$ . 29765) nil])
#@157 Calls mh-goto-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-goto-msg' for more info.
(defalias 'mh-show-goto-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-goto-msg] 4 (#$ . 30528) nil])
#@161 Calls mh-inc-folder from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-inc-folder' for more info.
(defalias 'mh-show-inc-folder #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-inc-folder] 4 (#$ . 31474) nil])
#@189 Calls mh-delete-subject-or-thread from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-subject-or-thread' for more info.
(defalias 'mh-show-delete-subject-or-thread #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-subject-or-thread] 4 (#$ . 32428) nil])
#@169 Calls mh-delete-subject from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-subject' for more info.
(defalias 'mh-show-delete-subject #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-subject] 4 (#$ . 33438) nil])
#@159 Calls mh-print-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-print-msg' for more info.
(defalias 'mh-show-print-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-print-msg] 4 (#$ . 34408) nil])
#@73 Calls mh-send from the message's folder.
See `mh-send' for more info.
(defalias 'mh-show-send #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-send] 4 (#$ . 35357) nil])
#@93 Calls mh-toggle-showing from the message's folder.
See `mh-toggle-showing' for more info.
(defalias 'mh-show-toggle-showing #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-toggle-showing] 4 (#$ . 36095) nil])
#@81 Calls mh-pipe-msg from the message's folder.
See `mh-pipe-msg' for more info.
(defalias 'mh-show-pipe-msg #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-pipe-msg] 4 (#$ . 36873) nil])
#@163 Calls mh-sort-folder from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-sort-folder' for more info.
(defalias 'mh-show-sort-folder #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-sort-folder] 4 (#$ . 37628) nil])
#@89 Calls mh-visit-folder from the message's folder.
See `mh-visit-folder' for more info.
(defalias 'mh-show-visit-folder #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-visit-folder] 4 (#$ . 38585) nil])
#@167 Calls mh-rescan-folder from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-rescan-folder' for more info.
(defalias 'mh-show-rescan-folder #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-rescan-folder] 4 (#$ . 39356) nil])
#@163 Calls mh-pack-folder from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-pack-folder' for more info.
(defalias 'mh-show-pack-folder #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-pack-folder] 4 (#$ . 40322) nil])
#@87 Calls mh-kill-folder from the message's folder.
See `mh-kill-folder' for more info.
(defalias 'mh-show-kill-folder #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-kill-folder] 4 (#$ . 41279) nil])
#@89 Calls mh-list-folders from the message's folder.
See `mh-list-folders' for more info.
(defalias 'mh-show-list-folders #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-list-folders] 4 (#$ . 42045) nil])
#@163 Calls mh-undo-folder from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-undo-folder' for more info.
(defalias 'mh-show-undo-folder #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-undo-folder] 4 (#$ . 42816) nil])
#@179 Calls mh-delete-msg-from-seq from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-msg-from-seq' for more info.
(defalias 'mh-show-delete-msg-from-seq #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-msg-from-seq] 4 (#$ . 43774) nil])
#@161 Calls mh-delete-seq from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-delete-seq' for more info.
(defalias 'mh-show-delete-seq #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-delete-seq] 4 (#$ . 44764) nil])
#@169 Calls mh-list-sequences from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-list-sequences' for more info.
(defalias 'mh-show-list-sequences #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-list-sequences] 4 (#$ . 45718) nil])
#@167 Calls mh-narrow-to-seq from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-seq' for more info.
(defalias 'mh-show-narrow-to-seq #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-seq] 4 (#$ . 46688) nil])
#@169 Calls mh-put-msg-in-seq from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-put-msg-in-seq' for more info.
(defalias 'mh-show-put-msg-in-seq #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-put-msg-in-seq] 4 (#$ . 47654) nil])
#@167 Calls mh-msg-is-in-seq from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-msg-is-in-seq' for more info.
(defalias 'mh-show-msg-is-in-seq #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-msg-is-in-seq] 4 (#$ . 48624) nil])
#@151 Calls mh-widen from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-widen' for more info.
(defalias 'mh-show-widen #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-widen] 4 (#$ . 49590) nil])
#@175 Calls mh-narrow-to-subject from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-subject' for more info.
(defalias 'mh-show-narrow-to-subject #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-subject] 4 (#$ . 50524) nil])
#@169 Calls mh-narrow-to-from from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-from' for more info.
(defalias 'mh-show-narrow-to-from #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-from] 4 (#$ . 51506) nil])
#@165 Calls mh-narrow-to-cc from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-cc' for more info.
(defalias 'mh-show-narrow-to-cc #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-cc] 4 (#$ . 52476) nil])
#@171 Calls mh-narrow-to-range from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-range' for more info.
(defalias 'mh-show-narrow-to-range #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-range] 4 (#$ . 53438) nil])
#@165 Calls mh-narrow-to-to from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-to' for more info.
(defalias 'mh-show-narrow-to-to #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-to] 4 (#$ . 54412) nil])
#@159 Calls mh-store-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-store-msg' for more info.
(defalias 'mh-show-store-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-store-msg] 4 (#$ . 55374) nil])
#@163 Calls mh-page-digest from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-page-digest' for more info.
(defalias 'mh-show-page-digest #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-page-digest] 4 (#$ . 56324) nil])
#@183 Calls mh-page-digest-backwards from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-page-digest-backwards' for more info.
(defalias 'mh-show-page-digest-backwards #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-page-digest-backwards] 4 (#$ . 57282) nil])
#@165 Calls mh-burst-digest from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-burst-digest' for more info.
(defalias 'mh-show-burst-digest #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-burst-digest] 4 (#$ . 58280) nil])
#@157 Calls mh-page-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-page-msg' for more info.
(defalias 'mh-show-page-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-page-msg] 4 (#$ . 59242) nil])
#@167 Calls mh-previous-page from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-previous-page' for more info.
(defalias 'mh-show-previous-page #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-previous-page] 4 (#$ . 60188) nil])
#@77 Calls mh-modify from the message's folder.
See `mh-modify' for more info.
(defalias 'mh-show-modify #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-modify] 4 (#$ . 61153) nil])
#@163 Calls mh-next-button from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-next-button' for more info.
(defalias 'mh-show-next-button #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-next-button] 4 (#$ . 61900) nil])
#@163 Calls mh-prev-button from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-prev-button' for more info.
(defalias 'mh-show-prev-button #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-prev-button] 4 (#$ . 62858) nil])
#@187 Calls mh-folder-toggle-mime-part from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-folder-toggle-mime-part' for more info.
(defalias 'mh-show-toggle-mime-part #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-folder-toggle-mime-part] 4 (#$ . 63816) nil])
#@183 Calls mh-folder-save-mime-part from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-folder-save-mime-part' for more info.
(defalias 'mh-show-save-mime-part #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-folder-save-mime-part] 4 (#$ . 64815) nil])
#@187 Calls mh-folder-inline-mime-part from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-folder-inline-mime-part' for more info.
(defalias 'mh-show-inline-mime-part #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-folder-inline-mime-part] 4 (#$ . 65806) nil])
#@169 Calls mh-toggle-threads from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-toggle-threads' for more info.
(defalias 'mh-show-toggle-threads #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-toggle-threads] 4 (#$ . 66805) nil])
#@167 Calls mh-thread-delete from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-thread-delete' for more info.
(defalias 'mh-show-thread-delete #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-thread-delete] 4 (#$ . 67775) nil])
#@167 Calls mh-thread-refile from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-thread-refile' for more info.
(defalias 'mh-show-thread-refile #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-thread-refile] 4 (#$ . 68741) nil])
#@173 Calls mh-update-sequences from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-update-sequences' for more info.
(defalias 'mh-show-update-sequences #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-update-sequences] 4 (#$ . 69707) nil])
#@171 Calls mh-next-unread-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-next-unread-msg' for more info.
(defalias 'mh-show-next-unread-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-next-unread-msg] 4 (#$ . 70685) nil])
#@179 Calls mh-previous-unread-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-previous-unread-msg' for more info.
(defalias 'mh-show-previous-unread-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-previous-unread-msg] 4 (#$ . 71659) nil])
#@171 Calls mh-thread-ancestor from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-thread-ancestor' for more info.
(defalias 'mh-show-thread-ancestor #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-thread-ancestor] 4 (#$ . 72649) nil])
#@179 Calls mh-thread-next-sibling from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-thread-next-sibling' for more info.
(defalias 'mh-show-thread-next-sibling #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-thread-next-sibling] 4 (#$ . 73623) nil])
#@187 Calls mh-thread-previous-sibling from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-thread-previous-sibling' for more info.
(defalias 'mh-show-thread-previous-sibling #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-thread-previous-sibling] 4 (#$ . 74613) nil])
#@101 Calls mh-index-visit-folder from the message's folder.
See `mh-index-visit-folder' for more info.
(defalias 'mh-show-index-visit-folder #[nil "\304\305!!\2059 \306 \307\310\307\"\210\311\312\313\314 !!!\n\232\204$ \315 \210\316\317!\210\320\321!\2031 \321 \210\322\216\323\324!\317,\207" [mh-show-folder-buffer normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil pop-to-buffer buffer-name window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\n\211\207" [major-mode normal-exit config mh-previous-window-config fboundp deactivate-mark set-window-configuration] 2] call-interactively mh-index-visit-folder] 4 (#$ . 75619) nil])
#@163 Calls mh-toggle-tick from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-toggle-tick' for more info.
(defalias 'mh-show-toggle-tick #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-toggle-tick] 4 (#$ . 76414) nil])
#@169 Calls mh-narrow-to-tick from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-narrow-to-tick' for more info.
(defalias 'mh-show-narrow-to-tick #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-narrow-to-tick] 4 (#$ . 77372) nil])
#@169 Calls mh-junk-blacklist from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-junk-blacklist' for more info.
(defalias 'mh-show-junk-blacklist #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-junk-blacklist] 4 (#$ . 78342) nil])
#@169 Calls mh-junk-whitelist from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-junk-whitelist' for more info.
(defalias 'mh-show-junk-whitelist #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-junk-whitelist] 4 (#$ . 79312) nil])
#@177 Calls mh-index-new-messages from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-index-new-messages' for more info.
(defalias 'mh-show-index-new-messages #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-index-new-messages] 4 (#$ . 80282) nil])
#@183 Calls mh-index-ticked-messages from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-index-ticked-messages' for more info.
(defalias 'mh-show-index-ticked-messages #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-index-ticked-messages] 4 (#$ . 81268) nil])
#@189 Calls mh-index-sequenced-messages from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-index-sequenced-messages' for more info.
(defalias 'mh-show-index-sequenced-messages #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-index-sequenced-messages] 4 (#$ . 82266) nil])
#@155 Calls mh-catchup from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-catchup' for more info.
(defalias 'mh-show-catchup #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-catchup] 4 (#$ . 83276) nil])
#@183 Calls mh-ps-print-toggle-color from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-ps-print-toggle-color' for more info.
(defalias 'mh-show-ps-print-toggle-color #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-ps-print-toggle-color] 4 (#$ . 84218) nil])
#@183 Calls mh-ps-print-toggle-faces from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-ps-print-toggle-faces' for more info.
(defalias 'mh-show-ps-print-toggle-faces #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-ps-print-toggle-faces] 4 (#$ . 85216) nil])
#@175 Calls mh-ps-print-msg-file from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-ps-print-msg-file' for more info.
(defalias 'mh-show-ps-print-msg-file #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-ps-print-msg-file] 4 (#$ . 86214) nil])
#@165 Calls mh-ps-print-msg from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-ps-print-msg' for more info.
(defalias 'mh-show-ps-print-msg #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-ps-print-msg] 4 (#$ . 87196) nil])
#@179 Calls mh-toggle-mime-buttons from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-toggle-mime-buttons' for more info.
(defalias 'mh-show-toggle-mime-buttons #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-toggle-mime-buttons] 4 (#$ . 88158) nil])
#@197 Calls mh-display-with-external-viewer from the message's folder.
When function completes, returns to the show buffer if it is
still visible.
See `mh-display-with-external-viewer' for more info.
(defalias 'mh-show-display-with-external-viewer #[nil "\305\306!!\205< \307 \310\311 \312\310\"\210\311\313\314\315 !!! \232\204' \316 \210\317\320!\210\321\322!\2034 \322 \210\323\216\324\325!\320-\207" [mh-show-folder-buffer cur-buffer-name normal-exit folder-buffer config buffer-live-p get-buffer current-window-configuration nil buffer-name pop-to-buffer window-buffer frame-first-window selected-frame delete-other-windows mh-goto-cur-msg t fboundp deactivate-mark #[nil "\304\305!\203 \305 \210\210 \204 \306\n!\207\307 !\205) \310\311\307 !!!\205) \312\307 !\313\"\207" [major-mode normal-exit config cur-buffer-name fboundp deactivate-mark set-window-configuration get-buffer window-live-p get-buffer-window pop-to-buffer nil] 4] call-interactively mh-display-with-external-viewer] 4 (#$ . 89148) nil])
#@32 Menu for MH-E folder-sequence.
(defvar mh-show-sequence-menu nil (#$ . 90173))
(easy-menu-do-define 'mh-show-sequence-menu mh-show-mode-map "Menu for MH-E folder-sequence." '("Sequence" ["Add Message to Sequence..." mh-show-put-msg-in-seq t] ["List Sequences for Message" mh-show-msg-is-in-seq t] ["Delete Message from Sequence..." mh-show-delete-msg-from-seq t] ["List Sequences in Folder..." mh-show-list-sequences t] ["Delete Sequence..." mh-show-delete-seq t] ["Narrow to Sequence..." mh-show-narrow-to-seq t] ["Widen from Sequence" mh-show-widen t] "--" ["Narrow to Subject Sequence" mh-show-narrow-to-subject t] ["Narrow to Tick Sequence" mh-show-narrow-to-tick (with-current-buffer mh-show-folder-buffer (and mh-tick-seq (mh-seq-msgs (mh-find-seq mh-tick-seq))))] ["Delete Rest of Same Subject" mh-show-delete-subject t] ["Toggle Tick Mark" mh-show-toggle-tick t] "--" ["Push State Out to MH" mh-show-update-sequences t]))
#@31 Menu for MH-E folder-message.
(defvar mh-show-message-menu nil (#$ . 91109))
(easy-menu-do-define 'mh-show-message-menu mh-show-mode-map "Menu for MH-E folder-message." '("Message" ["Show Message" mh-show-show t] ["Show Message with Header" mh-show-header-display t] ["Show Message with Preferred Alternative" mh-show-show-preferred-alternative t] ["Next Message" mh-show-next-undeleted-msg t] ["Previous Message" mh-show-previous-undeleted-msg t] ["Go to First Message" mh-show-first-msg t] ["Go to Last Message" mh-show-last-msg t] ["Go to Message by Number..." mh-show-goto-msg t] ["Modify Message" mh-show-modify t] ["Delete Message" mh-show-delete-msg t] ["Refile Message" mh-show-refile-msg t] ["Undo Delete/Refile" mh-show-undo t] ["Process Delete/Refile" mh-show-execute-commands t] "--" ["Compose a New Message" mh-send t] ["Reply to Message..." mh-show-reply t] ["Forward Message..." mh-show-forward t] ["Redistribute Message..." mh-show-redistribute t] ["Edit Message Again" mh-show-edit-again t] ["Re-edit a Bounced Message" mh-show-extract-rejected-mail t] "--" ["Copy Message to Folder..." mh-show-copy-msg t] ["Print Message" mh-show-print-msg t] ["Write Message to File..." mh-show-write-msg-to-file t] ["Pipe Message to Command..." mh-show-pipe-msg t] ["Unpack Uuencoded Message..." mh-show-store-msg t] ["Burst Digest Message" mh-show-burst-digest t]))
#@23 Menu for MH-E folder.
(defvar mh-show-folder-menu nil (#$ . 92486))
(byte-code "\302\303\304\305$\210\306\300\307\"\210\306\310\311\"\210\306\312\313\"\210\314\315 #\210\306\316\317\"\210\306\320\321\"\210\306\322\323\"\210\306\324\325\"\210\306\326\327\"\210\306\330\331\"\210\306\332\333\"\207" [mh-show-mode-map mh-inc-spool-map easy-menu-do-define mh-show-folder-menu "Menu for MH-E folder." ("Folder" ["Incorporate New Mail" mh-show-inc-folder t] ["Toggle Show/Folder" mh-show-toggle-showing t] ["Execute Delete/Refile" mh-show-execute-commands t] ["Rescan Folder" mh-show-rescan-folder t] ["Thread Folder" mh-show-toggle-threads t] ["Pack Folder" mh-show-pack-folder t] ["Sort Folder" mh-show-sort-folder t] "--" ["List Folders" mh-show-list-folders t] ["Visit a Folder..." mh-show-visit-folder t] ["View New Messages" mh-show-index-new-messages t] ["Search..." mh-search t] "--" ["Quit MH-E" mh-quit t]) gnus-define-keys-1 (" " mh-show-page-msg "!" mh-show-refile-or-write-again "'" mh-show-toggle-tick "," mh-show-header-display "." mh-show-show ":" mh-show-show-preferred-alternative ">" mh-show-write-message-to-file "?" mh-help "E" mh-show-extract-rejected-mail "M" mh-show-modify "" mh-show-previous-page "" mh-show-delete-msg-no-motion " " mh-show-next-button [backtab] mh-show-prev-button "\211" mh-show-prev-button "d" mh-show-redistribute "^" mh-show-refile-msg "c" mh-show-copy-msg "d" mh-show-delete-msg "e" mh-show-edit-again "f" mh-show-forward "g" mh-show-goto-msg "i" mh-show-inc-folder "k" mh-show-delete-subject-or-thread "m" mh-show-send "n" mh-show-next-undeleted-msg "\356" mh-show-next-unread-msg "o" mh-show-refile-msg "p" mh-show-previous-undeleted-msg "\360" mh-show-previous-unread-msg "q" mh-show-quit "r" mh-show-reply "s" mh-show-send "t" mh-show-toggle-showing "u" mh-show-undo "x" mh-show-execute-commands "v" mh-show-index-visit-folder "|" mh-show-pipe-msg) (mh-show-folder-map "F" mh-show-mode-map) ("?" mh-prefix-help "'" mh-index-ticked-messages "S" mh-show-sort-folder "c" mh-show-catchup "f" mh-show-visit-folder "k" mh-show-kill-folder "l" mh-show-list-folders "n" mh-index-new-messages "o" mh-show-visit-folder "p" mh-show-pack-folder "q" mh-show-index-sequenced-messages "r" mh-show-rescan-folder "s" mh-search "t" mh-show-toggle-threads "u" mh-show-undo-folder "v" mh-show-visit-folder) (mh-show-sequence-map "S" mh-show-mode-map) ("'" mh-show-narrow-to-tick "?" mh-prefix-help "d" mh-show-delete-msg-from-seq "k" mh-show-delete-seq "l" mh-show-list-sequences "n" mh-show-narrow-to-seq "p" mh-show-put-msg-in-seq "s" mh-show-msg-is-in-seq "w" mh-show-widen) define-key "I" (mh-show-junk-map "J" mh-show-mode-map) ("?" mh-prefix-help "b" mh-show-junk-blacklist "w" mh-show-junk-whitelist) (mh-show-ps-print-map "P" mh-show-mode-map) ("?" mh-prefix-help "C" mh-show-ps-print-toggle-color "F" mh-show-ps-print-toggle-faces "f" mh-show-ps-print-msg-file "l" mh-show-print-msg "p" mh-show-ps-print-msg) (mh-show-thread-map "T" mh-show-mode-map) ("?" mh-prefix-help "u" mh-show-thread-ancestor "p" mh-show-thread-previous-sibling "n" mh-show-thread-next-sibling "t" mh-show-toggle-threads "d" mh-show-thread-delete "o" mh-show-thread-refile) (mh-show-limit-map "/" mh-show-mode-map) ("'" mh-show-narrow-to-tick "?" mh-prefix-help "c" mh-show-narrow-to-cc "g" mh-show-narrow-to-range "m" mh-show-narrow-to-from "s" mh-show-narrow-to-subject "t" mh-show-narrow-to-to "w" mh-show-widen) (mh-show-extract-map "X" mh-show-mode-map) ("?" mh-prefix-help "s" mh-show-store-msg "u" mh-show-store-msg) (mh-show-digest-map "D" mh-show-mode-map) ("?" mh-prefix-help " " mh-show-page-digest "" mh-show-page-digest-backwards "b" mh-show-burst-digest) (mh-show-mime-map "K" mh-show-mode-map) ("?" mh-prefix-help "a" mh-mime-save-parts "e" mh-show-display-with-external-viewer "v" mh-show-toggle-mime-part "o" mh-show-save-mime-part "i" mh-show-inline-mime-part "t" mh-show-toggle-mime-buttons " " mh-show-next-button [backtab] mh-show-prev-button "\211" mh-show-prev-button)] 5)
#@86 Return the value of a header field FIELD to font-lock.
Argument LIMIT limits search.
(defalias 'mh-header-field-font-lock #[(field limit) "`U?\205I \306 \211W\203 \202 \307` W\205H \310\311\312\f\"\n\307#\205H \313\224\313\225 \314 \210`V\203< b\210\315
\211T`F!\210*\307+\207" [limit mail-header-end lesser-limit case-fold-search field match-one-e mh-mail-header-end t re-search-forward format "^%s" 0 mh-header-field-end set-match-data match-one-b] 6 (#$ . 96503)])
#@83 Return the value of a header field To to font-lock.
Argument LIMIT limits search.
(defalias 'mh-header-to-font-lock #[(limit) "\301\302\"\207" [limit mh-header-field-font-lock "To:"] 3 (#$ . 96992)])
#@83 Return the value of a header field cc to font-lock.
Argument LIMIT limits search.
(defalias 'mh-header-cc-font-lock #[(limit) "\301\302\"\207" [limit mh-header-field-font-lock "cc:"] 3 (#$ . 97199)])
#@88 Return the value of a header field Subject to font-lock.
Argument LIMIT limits search.
(defalias 'mh-header-subject-font-lock #[(limit) "\301\302\"\207" [limit mh-header-field-font-lock "Subject:"] 3 (#$ . 97406)])
#@75 Return the entire mail header to font-lock.
Argument LIMIT limits search.
(defalias 'mh-letter-header-font-lock #[(limit) "`U?\205, \304 \305\216\306 *\211W\203 \n\202 \307 \205+ \310\311 D!\210 b\210\312*\207" [limit save-match-data-internal mail-header-end lesser-limit match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] mh-mail-header-end mh-in-header-p set-match-data 1 t] 4 (#$ . 97628)])
#@317 Limit font-lock in `mh-show-mode' to the header.
Used when the option `mh-highlight-citation-style' is set to
"Gnus", leaving the body to be dealt with by Gnus highlighting.
The region between BEG and END is given over to be fontified and
LOUDLY controls if a user sees a message about the fontification
operation.
(defalias 'mh-show-font-lock-fontify-region #[(beg end loudly) "\304 W\203 \nW\203 \305 \n #\202, W\203+ \nY\203+ \305 #\202, \306)\207" [header-end beg end loudly mh-mail-header-end font-lock-default-fontify-region nil] 4 (#$ . 98076)])
#@57 Additional expressions to highlight in MH-Show buffers.
(defvar mh-show-font-lock-keywords '(("^\\(From:\\|Sender:\\)\\(.*\\)" (1 'default) (2 'mh-show-from)) (mh-header-to-font-lock (0 'default) (1 'mh-show-to)) (mh-header-cc-font-lock (0 'default) (1 'mh-show-cc)) ("^\\(Reply-To:\\|Return-Path:\\)\\(.*\\)$" (1 'default) (2 'mh-show-from)) (mh-header-subject-font-lock (0 'default) (1 'mh-show-subject)) ("^\\(Apparently-To:\\|Newsgroups:\\)\\(.*\\)" (1 'default) (2 'mh-show-cc)) ("^\\(In-Reply-To\\|Date\\):\\(.*\\)$" (1 'default) (2 'mh-show-date)) (mh-letter-header-font-lock (0 'mh-show-header append t))) (#$ . 98647))
#@47 Return variable `mh-show-font-lock-keywords'.
(defalias 'mh-show-font-lock-keywords #[nil "\207" [mh-show-font-lock-keywords] 1 (#$ . 99281)])
#@57 Additional expressions to highlight in MH-Show buffers.
(defvar mh-show-font-lock-keywords-with-cite (byte-code "\304\305\211\306P\307 \310 \311\n\312\313\260\314BDC\"+\207" [cite-chars cite-prefix cite-suffix mh-show-font-lock-keywords "[>|}]" "A-Za-z" "0-9_.@-`'\"" append "\\=[ ]*\\(\\([" "]+[" "]*\\)?\\(" "[ ]*\\)\\)+\\(.*\\)" ((beginning-of-line) (end-of-line) (2 font-lock-constant-face nil t) (4 font-lock-comment-face nil t))] 11) (#$ . 99431))
#@57 Return variable `mh-show-font-lock-keywords-with-cite'.
(defalias 'mh-show-font-lock-keywords-with-cite #[nil "\207" [mh-show-font-lock-keywords-with-cite] 1 (#$ . 99899)])
(put 'mh-show-mode 'mode-class 'special)
(defvar mh-show-mode-hook nil)
(byte-code "\300\301N\204\f \302\300\301\303#\210\304\305!\204 \302\305\306\307#\210\300\207" [mh-show-mode-hook variable-documentation put "Hook run after entering MH-Show mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp mh-show-mode-map definition-name mh-show-mode] 4)
(defvar mh-show-mode-map (make-sparse-keymap))
(byte-code "\301\302N\204 \303\301\302\304\305!#\210\306\307!\204 \303\307\310\311#\210\312\313 !\210\307\302N\204- \303\307\302\304\314!#\210\306\300!\204B \303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P \303\300\302\304\320!#\210\303\311\321\322#\207" [mh-show-mode-abbrev-table mh-show-mode-map variable-documentation put purecopy "Keymap for `mh-show-mode'." boundp mh-show-mode-syntax-table definition-name mh-show-mode (lambda (#1=#:def-tmp-var) (defvar mh-show-mode-syntax-table #1#)) make-syntax-table "Syntax table for `mh-show-mode'." (lambda (#1#) (defvar mh-show-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `mh-show-mode'." derived-mode-parent text-mode] 5)
#@557 Major mode for showing messages in MH-E.\<mh-show-mode-map>
Email addresses and URLs in the message are highlighted if the
option `goto-address-highlight-p' is on, which it is by default.
To view the web page for a highlighted URL or to send a message
using a highlighted email address, use the middle mouse button or
\[goto-address-at-point]. See Info node `(mh-e)Sending Mail' to
see how to configure Emacs to send the message using MH-E.
The hook `mh-show-mode-hook' is called upon entry to this mode.
See also `mh-folder-mode'.
\{mh-show-mode-map}
(defalias 'mh-show-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315 !\204' \316 \317 \"\210\320\f!\211 \2036
\321 =\203< \322\f\323 \"\210)\324/\325\"\204V /0=\204V \326/\3250C#\210\327 !\210\330\f!\210/0\331\332!\203p \306\332!\2101\306\333!\2102\334\335! \3363\306\337!\210\307 \306\340!\2104\341\267\202\241 \342 \202\244 \343 \344 \210\202\244 \345 5\203\260 \346\347\350\351\307$\210\3526!\210\3527!\210\3528!\210\306\353!\210\354 \210\327 !\210)\355\356!\207" [delay-mode-hooks major-mode mode-name mh-show-mode-map mh-show-mode-syntax-table parent make-local-variable t text-mode mh-show-mode "MH-Show" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table boundp tool-bar-map mail-header-separator default-value paragraph-start ((vanish . t) t) line-move-ignore-invisible font-lock-defaults #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (font-lock 146 gnus 152)) (mh-show-font-lock-keywords-with-cite t) ((mh-show-font-lock-keywords) t nil nil nil (font-lock-fontify-region-function . mh-show-font-lock-fontify-region)) mh-gnus-article-highlight-citation (mh-show-font-lock-keywords t) add-hook kill-buffer-hook mh-mime-cleanup nil easy-menu-add mh-show-folder-buffer buffer-disable-undo run-mode-hooks mh-show-mode-hook mh-show-mode-abbrev-table local-abbrev-table mh-show-tool-bar-map mh-mail-header-separator buffer-invisibility-spec mh-highlight-citation-style mh-decode-mime-flag mh-show-sequence-menu mh-show-message-menu mh-show-folder-menu] 6 (#$ . 101274) nil])
#@56 Decode >From at beginning of lines for `mh-show-mode'.
(defalias 'mh-show-unquote-From #[nil "\212\303 \304\211\305 b\210\306\307\304\310#\203 \311\312!\210\202\f \313\n!,\207" [buffer-read-only case-fold-search modified buffer-modified-p nil mh-mail-header-end re-search-forward "^>From" t replace-match "From" set-buffer-modified-p] 4 (#$ . 103585)])
#@21 Use `goto-address'.
(defalias 'mh-show-addr #[nil "\300 \207" [goto-address] 1 (#$ . 103948)])
#@52 Highlight cited text in current buffer using Gnus.
(defalias 'mh-gnus-article-highlight-citation #[nil "\305\306K\307\216\306M\210\310 \311 \312\fA\f@C\" \313\314!\210\315\n!.\207" [#1=#:vnew #2=#:old modified gnus-article-buffer gnus-cite-face-list #[(&rest _args) "\300\207" [nil] 1] gnus-article-add-button #[nil "\301M\207" [#2# gnus-article-add-button] 2] buffer-modified-p buffer-name append gnus-article-highlight-citation t set-buffer-modified-p] 3 (#$ . 104049) nil])
(provide 'mh-show)
Zerion Mini Shell 1.0