Current File : //proc/thread-self/root/kunden/usr/share/emacs/27.2/lisp/mh-e/mh-show.elc |
;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>