Mercurial > emacs
comparison lisp/mh-e/mh-comp.el @ 69272:cc66ebd3f3a4
(mh-send-letter, mh-insert-auto-fields): Sync docstrings with manual.
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Fri, 03 Mar 2006 20:02:10 +0000 |
parents | 7daec5f4a289 |
children | 67b5315387f4 a7364c1a561e |
comparison
equal
deleted
inserted
replaced
69271:dd15fb0b9b1b | 69272:cc66ebd3f3a4 |
---|---|
227 Mail Delivery*\". | 227 Mail Delivery*\". |
228 | 228 |
229 The hook `mh-before-send-letter-hook' is run at the beginning of | 229 The hook `mh-before-send-letter-hook' is run at the beginning of |
230 this command. For example, if you want to check your spelling in | 230 this command. For example, if you want to check your spelling in |
231 your message before sending, add the function `ispell-message'. | 231 your message before sending, add the function `ispell-message'. |
232 | |
233 Unless `mh-insert-auto-fields' had previously been called | |
234 manually, the function `mh-insert-auto-fields' is called to | |
235 insert fields based upon the recipients. If fields are added, you | |
236 are given a chance to see and to confirm these fields before the | |
237 message is actually sent. You can do away with this confirmation | |
238 by turning off the option `mh-auto-fields-prompt-flag'. | |
232 | 239 |
233 In case the MH \"send\" program is installed under a different name, | 240 In case the MH \"send\" program is installed under a different name, |
234 use `mh-send-prog' to tell MH-E the name." | 241 use `mh-send-prog' to tell MH-E the name." |
235 (interactive "P") | 242 (interactive "P") |
236 (run-hooks 'mh-before-send-letter-hook) | 243 (run-hooks 'mh-before-send-letter-hook) |
977 | 984 |
978 ;;;###mh-autoload | 985 ;;;###mh-autoload |
979 (defun mh-insert-auto-fields (&optional non-interactive) | 986 (defun mh-insert-auto-fields (&optional non-interactive) |
980 "Insert custom fields if recipient is found in `mh-auto-fields-list'. | 987 "Insert custom fields if recipient is found in `mh-auto-fields-list'. |
981 | 988 |
982 Sets buffer-local `mh-insert-auto-fields-done-local' if header | 989 Once the header contains one or more recipients, you may run this |
983 fields were added. If NON-INTERACTIVE is non-nil, perform actions | 990 command to insert these fields manually. However, if you use this |
984 quietly and only if `mh-insert-auto-fields-done-local' is nil. | 991 command, the automatic insertion when the message is sent is |
985 | 992 disabled. |
986 An `identity' entry is skipped if one was already entered | 993 |
987 manually. | 994 In a program, set buffer-local `mh-insert-auto-fields-done-local' |
988 | 995 if header fields were added. If NON-INTERACTIVE is non-nil, |
989 Return t if fields added; otherwise return nil." | 996 perform actions quietly and only if |
997 `mh-insert-auto-fields-done-local' is nil. Return t if fields | |
998 added; otherwise return nil." | |
990 (interactive) | 999 (interactive) |
991 (when (or (not non-interactive) | 1000 (when (or (not non-interactive) |
992 (not mh-insert-auto-fields-done-local)) | 1001 (not mh-insert-auto-fields-done-local)) |
993 (save-excursion | 1002 (save-excursion |
994 (when (and (or (mh-goto-header-field "To:") | 1003 (when (and (or (mh-goto-header-field "To:") |