Lines Matching +defs:message +defs:send +defs:mail +defs:function
1 ;;; mh-e.el --- GNU Emacs interface to the MH mail system
10 ;; Keywords: mail
31 ;; MH-E is an Emacs interface to the MH mail system.
38 ;; MH (Message Handler) is a powerful mail reader. See
46 ;; M-x mh-rmail to read mail. Type C-h m there for a list of commands.
48 ;; M-x mh-smail to send mail. From within the mail reader, "s" works, too.
66 ;; Subscribe by sending a "subscribe" message to
68 ;; https://sourceforge.net/mail/?group_id=13357
113 ;; Function declarations (use font-lock-function-name-face).
124 (7 (cond ((match-beginning 2) font-lock-function-name-face)
160 Use the function `mh-variants' instead.")
201 User's mail folder directory.")
247 "List of message numbers to delete.
269 "Direction to move to next message.")
290 "Buffer that displays message for this folder.")
293 "If non-nil, show the message in a separate window.")
305 "Keeps track of folder whose message is being displayed.")
315 (defvar mh-mail-header-separator "--------"
319 should use `mail-header-separator' instead.
320 `mail-header-separator' is initialized to
321 `mh-mail-header-separator' in `mh-letter-mode'; in other
355 "Non-nil means next SPC or whatever goes to next undeleted message.")
363 A signature separator is used to separate the body of a message
374 "Map of message index to various parts of the scan line.")
378 "Old map of message index to various parts of the scan line.
386 Emacs, and MH the first time a message is composed.")
408 "Display version information about MH-E and the MH mail handling system."
416 (let* ((compiled-mhe (byte-code-function-p (symbol-function 'mh-version)))
477 The function will execute CMD with ARGS and pass the first
659 (let ((error-message (buffer-substring (point-min) (point-max))))
662 (insert error-message)))
663 (error "%s failed, check buffer %s for error message"
674 ;; Temporary function and data structure used customization.
697 (put 'defgroup-mh 'lisp-indent-function 'defun)
707 (put 'defcustom-mh 'lisp-indent-function 'defun)
717 (put 'defface-mh 'lisp-indent-function 'defun)
733 This function looks for MH in `mh-sys-path', `mh-path' and
841 function `mh-variants'.
922 (message "%s installed as MH variant" mh-variant-in-use))
924 (message "%s installed as MH variant" mh-variant-in-use))
926 (message "%s installed as MH variant" mh-variant-in-use))
928 (message "No MH variant found on the system"))))
931 (message "Warning: %s variant not found. Autodetecting..." variant)
934 (message "Unknown variant; use %s"
1026 "Emacs interface to the MH mail system.
1030 :group 'mail
1041 "Organizing your mail with folders."
1062 "Incorporating your mail."
1069 "Dealing with junk mail."
1103 (defgroup-mh mh-sending-mail nil
1104 "Sending mail."
1118 "Reading your mail."
1184 expanded to the full address in the message draft. By default,
1357 (defcustom-mh mh-default-folder-for-message-function nil
1360 When this function is called, the current buffer contains the message
1361 being refiled and point is at the start of the message. This function
1365 :type 'function
1392 mail from various people for whom you have an alias, but file
1403 The prefix is used to prevent clutter in your mail directory.
1440 `mh-signature-file-name', a file, or a function. Specify a different
1449 to set the identity on every message. The menu item \"Set Default for
1478 (function)))
1502 When you send the message, MH will put a copy of your message in this
1505 the recipient's mail user agent supports this header field (as nmh
1518 can just send the message and the fields will be added automatically.
1520 the message is actually sent. You can do away with this confirmation
1524 and `mh-identity-list' definitions that may apply to the same message
1536 (function (lambda (arg) `(const ,arg)))
1563 (mapcar (function (lambda (arg) `(const ,arg)))
1579 function associated with the field you want to change with the
1580 name of a function you have written. You can also click on an
1582 the function you have written to handle it.
1598 :type '(repeat (cons (string :tag "Field") function))
1605 "*Program to incorporate new mail into a folder.
1627 retrieve mail from arbitrary spool files other than your system
1629 key bindings to incorporate this mail.
1632 you use \"procmail\" to filter this mail into \"~/mail/mh-e\" with
1635 MAILDIR=$HOME/mail
1637 * ^From mh-e-devel-admin@stop.mail-abuse.org
1640 In order to incorporate \"~/mail/mh-e\" into \"+mh-e\" with an
1642 on the \"INS\" button. Enter a \"Spool File\" of \"~/mail/mh-e\", a
1645 You can use \"xbuffy\" to automate the incorporation of this mail
1648 box ~/mail/mh-e
1672 (defvar mh-junk-function-alist
1679 blacklist a message as spam and whitelist a message incorrectly
1685 The function is always called with SYMBOL bound to
1687 `mh-junk-program'. The function sets the variable
1692 (loop for element in mh-junk-function-alist
1715 "Disposition of junk mail."
1762 "*Non-nil means \\<mh-letter-mode-map>\\[mh-letter-complete-or-space] does completion in message header."
1768 "*Non-nil means delete any window displaying the message.
1770 This deletes the window containing the original message after
1778 "*Verb to use for attribution when a message is yanked by \\<mh-letter-mode-map>\\[mh-yank-cur-msg].
1792 "*String to put before each line of a yanked or inserted message.
1802 `mail-citation-hook'."
1807 (defcustom-mh mh-letter-complete-function 'ispell-complete-word
1810 In the body of the message,
1811 \\<mh-letter-mode-map>\\[mh-letter-complete] runs this function,
1813 :type '(choice function (const nil))
1821 message without line wrapping."
1829 This option is used to select between a variety of mail security
1839 If you keep a copy of all of your outgoing mail with a \"Fcc:\"
1840 header field, this setting is vital so that you can read the mail
1857 This option may also be a symbol, in which case that function is
1862 said separator). The function `mh-signature-separator-p', which
1865 The signature is inserted into your message with the command
1876 mail user agents, including MH-E, use the separator to present
1884 "*File containing face header field to insert in outgoing mail.
1887 or \"X-Image-URL:\" then the contents are added to the message header
1913 "*Controls which part of a message is yanked by \\<mh-letter-mode-map>\\[mh-yank-cur-msg].
1915 To include the entire message, including the entire header, use
1917 the header. To yank only the portion of the message following the
1920 Choose \"Invoke supercite\" to pass the entire message and header
1924 message minus the header is yanked and a simple attribution line
1934 only performed if the show buffer matches the message being
1944 `mail-citation-hook' is ignored and `mh-ins-buf-prefix' is not
1965 message 200, then use the range \"200:200\"."
1980 "*Non-nil means that the message number width is determined dynamically.
1982 If you've created your own format to handle long message numbers,
1984 internal format based upon the largest message number if this option
1988 If you prefer fixed-width message numbers, turn off this option and
2051 message is held in this option. Unless this variable contains an
2083 ;;; Sending Mail (:group 'mh-sending-mail)
2093 non-textual attachments that were in the forwarded message. Be
2098 :group 'mh-sending-mail
2101 (defcustom-mh mh-compose-letter-function nil
2104 However, it is the last function called before you edit your
2105 message. The consequence of this is that you can write a function
2106 to write and send the message for you. This function is passed
2109 :type '(choice (const nil) function)
2110 :group 'mh-sending-mail
2116 :group 'mh-sending-mail
2120 "*Format string for forwarded message subject.
2123 first \"%s\" is replaced with the sender of the original message,
2126 :group 'mh-sending-mail
2136 :group 'mh-sending-mail
2143 letter for redistribution, which is the case if \"send\" is
2145 find that MH will not allow you to redistribute a message that
2148 :group 'mh-sending-mail
2156 the time that you specify \"cc\" when you reply to a message, set
2164 :group 'mh-sending-mail
2167 (defcustom-mh mh-reply-show-message-flag t
2170 If you include the message automatically, you can hide the
2175 :group 'mh-sending-mail
2187 If a message is in any sequence (except \"Previous-Sequence:\"
2208 "*Non-nil means flush MH sequences to disk after message is shown\\<mh-folder-mode-map>.
2211 to MH when a message is shown. They include the sequence
2235 (defcustom-mh mh-clean-message-header-flag t
2253 \\[mh-toggle-mh-decode-mime-flag] to view the raw message.
2265 Sometimes, a mail program will produce multiple alternatives of
2281 may receive code or HTML which the sender has added to his message as
2380 If the sender of the message has cited other messages in his
2381 message, then MH-E will highlight these citations to emphasize
2424 "Original-Lines:" ; mail to news
2425 "Original-NNTP-" ; mail to news
2426 "Original-Newsgroups:" ; mail to news
2427 "Original-Path:" ; mail to news
2428 "Original-Received:" ; mail to news
2429 "Original-To:" ; mail to news
2430 "Original-X-" ; mail to news
2481 "X-Evolution:" ; Evolution mail client
2601 Because the function `mh-invisible-headers' uses both
2617 See also `mh-clean-message-header-flag'."
2635 See also `mh-clean-message-header-flag'."
2645 "*Regexp matching lines in a message header that are not to be shown.
2685 folder and the message number and is useful for print job names.
2699 Some older mail programs do not insert this needed plumbing to
2715 Some older mail programs do not insert this needed plumbing to
2733 display the message (within MH-E), change this option from its default
2775 WARNING: If you do this, do not delete the message until it is printed
2785 "*Maximum size of message (in bytes) to display automatically.
2789 message are shown regardless of size."
2799 header of your message, the sender's face will appear in the \"From:\"
2826 image doesn't need to be transmitted with every single mail.
2886 (defcustom-mh mh-tool-bar-search-function 'mh-search
2890 \"Other Function\" from the \"Value Menu\" and enter a function
2893 (function :tag "Other Function"))
2981 (defcustom-mh mh-before-send-letter-hook nil
2982 "Hook run at the beginning of the \\<mh-letter-mode-map>\\[mh-send-letter] command.
2984 For example, if you want to check your spelling in your message
2985 before sending, add the `ispell-message' function."
2987 :options '(ispell-message)
2993 "Hook run by \\<mh-letter-mode-map>\\[mh-delete-msg] after marking each message for deletion.
2996 kept statistics on his mail usage."
3024 :group 'mh-sending-mail
3028 "Hook run by \\<mh-folder-mode-map>\\[mh-inc-folder] after incorporating mail into a folder."
3038 function used to insert the signature with
3073 :group 'mh-sending-mail
3108 "Hook run by \\<mh-folder-mode-map>\\[mh-refile-msg] after marking each message for refiling."
3115 "Hook run after \\<mh-folder-mode-map>\\[mh-show] shows a message.
3128 This hook is called early on in the process of the message
3130 message's content. See `mh-show-hook'."
3159 ;; accessing face data with function mh-face-data.
3160 ;; 3. Add inherit argument to function mh-face-data if applicable.
3305 Used by function `mh-face-data' which returns spec that is
3331 function finds display entries with \"min-colors\" requirements
3380 "Current message number face."
3394 "Deleted message face."
3412 "Refiled message face."
3444 "Ticked message face."