comparison lisp/mh-e/mh-loaddefs.el @ 50702:7dd3d5eae9c7

Upgraded to MH-E version 7.3. See etc/MH-E-NEWS and lisp/mh-e/ChangeLog for details.
author Bill Wohler <wohler@newt.com>
date Fri, 25 Apr 2003 05:52:00 +0000
parents b35587af8747
children 63894db35199
comparison
equal deleted inserted replaced
50701:cb5f0a5d5b36 50702:7dd3d5eae9c7
3 ;;; Copyright (C) 2003 Free Software Foundation, Inc. 3 ;;; Copyright (C) 2003 Free Software Foundation, Inc.
4 ;;; Author: Bill Wohler <wohler@newt.com> 4 ;;; Author: Bill Wohler <wohler@newt.com>
5 ;;; Keywords: mail 5 ;;; Keywords: mail
6 ;;; Commentary: 6 ;;; Commentary:
7 ;;; Change Log: 7 ;;; Change Log:
8 ;; $Id: mh-loaddefs.el,v 1.36 2003/02/03 19:15:13 wohler Exp $
9 ;;; Code: 8 ;;; Code:
10 9
11 ;;;### (autoloads (mh-letter-complete mh-open-line mh-fully-kill-draft 10 ;;;### (autoloads (mh-letter-complete mh-open-line mh-fully-kill-draft
12 ;;;;;; mh-yank-cur-msg mh-insert-letter mh-send-letter mh-check-whom 11 ;;;;;; mh-yank-cur-msg mh-insert-letter mh-send-letter mh-check-whom
13 ;;;;;; mh-insert-signature mh-to-fcc mh-to-field mh-fill-paragraph-function 12 ;;;;;; mh-insert-signature mh-to-fcc mh-to-field mh-fill-paragraph-function
14 ;;;;;; mh-send-other-window mh-send mh-reply mh-redistribute mh-forward 13 ;;;;;; mh-send-other-window mh-send mh-reply mh-redistribute mh-forward
15 ;;;;;; mh-extract-rejected-mail mh-edit-again) "mh-comp" "mh-comp.el" 14 ;;;;;; mh-extract-rejected-mail mh-edit-again) "mh-comp" "mh-comp.el"
16 ;;;;;; (15924 43423)) 15 ;;;;;; (16039 39609))
17 ;;; Generated autoloads from mh-comp.el 16 ;;; Generated autoloads from mh-comp.el
18 17
19 (autoload (quote mh-edit-again) "mh-comp" "\ 18 (autoload (quote mh-edit-again) "mh-comp" "\
20 Clean up a draft or a message MSG previously sent and make it resendable. 19 Clean up a draft or a message MSG previously sent and make it resendable.
21 Default is the current message. 20 Default is the current message.
27 Default is the current message. The variable `mh-new-draft-cleaned-headers' 26 Default is the current message. The variable `mh-new-draft-cleaned-headers'
28 gives the headers to clean out of the original message. 27 gives the headers to clean out of the original message.
29 See also documentation for `\\[mh-send]' function." t nil) 28 See also documentation for `\\[mh-send]' function." t nil)
30 29
31 (autoload (quote mh-forward) "mh-comp" "\ 30 (autoload (quote mh-forward) "mh-comp" "\
32 Forward one or more messages to the recipients TO and CC. 31 Forward messages to the recipients TO and CC.
33 32 Use optional MSG-OR-SEQ argument to specify a message or sequence to forward.
34 Use the optional MSG-OR-SEQ to specify a message or sequence to forward. 33 Default is the displayed message.
35 34 If optional prefix argument is provided, then prompt for the message sequence.
36 Default is the displayed message. If optional prefix argument is given then 35 If variable `transient-mark-mode' is non-nil and the mark is active, then the
37 prompt for the message sequence. If variable `transient-mark-mode' is non-nil 36 selected region is forwarded.
38 and the mark is active, then the selected region is forwarded. 37 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
38 region in a cons cell, or a sequence.
39
39 See also documentation for `\\[mh-send]' function." t nil) 40 See also documentation for `\\[mh-send]' function." t nil)
40 41
41 (autoload (quote mh-redistribute) "mh-comp" "\ 42 (autoload (quote mh-redistribute) "mh-comp" "\
42 Redistribute displayed message to recipients TO and CC. 43 Redistribute displayed message to recipients TO and CC.
43 Use optional argument MSG to redistribute another message. 44 Use optional argument MSG to redistribute another message.
44 Depending on how your copy of MH was compiled, you may need to change the 45 Depending on how your copy of MH was compiled, you may need to change the
45 setting of the variable `mh-redist-full-contents'. See its documentation." t nil) 46 setting of the variable `mh-redist-full-contents'. See its documentation." t nil)
46 47
47 (autoload (quote mh-reply) "mh-comp" "\ 48 (autoload (quote mh-reply) "mh-comp" "\
48 Reply to MESSAGE (default: current message). 49 Reply to MESSAGE.
50 Default is the displayed message.
49 If the optional argument REPLY-TO is not given, prompts for type of addresses 51 If the optional argument REPLY-TO is not given, prompts for type of addresses
50 to reply to: 52 to reply to:
51 from sender only, 53 from sender only,
52 to sender and primary recipients, 54 to sender and primary recipients,
53 cc/all sender and all recipients. 55 cc/all sender and all recipients.
105 (autoload (quote mh-send-letter) "mh-comp" "\ 107 (autoload (quote mh-send-letter) "mh-comp" "\
106 Send the draft letter in the current buffer. 108 Send the draft letter in the current buffer.
107 If optional prefix argument ARG is provided, monitor delivery. 109 If optional prefix argument ARG is provided, monitor delivery.
108 The value of `mh-before-send-letter-hook' is a list of functions to be called, 110 The value of `mh-before-send-letter-hook' is a list of functions to be called,
109 with no arguments, before doing anything. 111 with no arguments, before doing anything.
110 Run `\\[mh-edit-mhn]' if variable `mh-mhn-compose-insert-flag' is set. 112 Run `\\[mh-edit-mhn]' if mhn directives are present; otherwise
111 Run `\\[mh-mml-to-mime]' if variable `mh-mml-compose-insert-flag' is set. 113 run `\\[mh-mml-to-mime]' if mml directives are present.
112 Insert X-Mailer field if variable `mh-insert-x-mailer-flag' is set. 114 Insert X-Mailer field if variable `mh-insert-x-mailer-flag' is set.
113 Insert X-Face field if the file specified by `mh-x-face-file' exists." t nil) 115 Insert X-Face field if the file specified by `mh-x-face-file' exists." t nil)
114 116
115 (autoload (quote mh-insert-letter) "mh-comp" "\ 117 (autoload (quote mh-insert-letter) "mh-comp" "\
116 Insert a message into the current letter. 118 Insert a message into the current letter.
147 by the function designated by `mh-letter-complete-function' elsewhere, 149 by the function designated by `mh-letter-complete-function' elsewhere,
148 passing the prefix ARG if any." t nil) 150 passing the prefix ARG if any." t nil)
149 151
150 ;;;*** 152 ;;;***
151 153
152 ;;;### (autoloads (mh-tool-bar-folder-set mh-tool-bar-letter-set 154 ;;;### (autoloads (mh-customize) "mh-customize" "mh-customize.el"
153 ;;;;;; mh-customize) "mh-customize" "mh-customize.el" (15933 21842)) 155 ;;;;;; (16038 15647))
154 ;;; Generated autoloads from mh-customize.el 156 ;;; Generated autoloads from mh-customize.el
155 157
156 (autoload (quote mh-customize) "mh-customize" "\ 158 (autoload (quote mh-customize) "mh-customize" "\
157 Customize MH-E variables. 159 Customize MH-E variables.
158 With optional argument DELETE-OTHER-WINDOWS-FLAG, other windows in the frame 160 With optional argument DELETE-OTHER-WINDOWS-FLAG, other windows in the frame
159 are removed." t nil) 161 are removed." t nil)
160 162
161 (autoload (quote mh-tool-bar-letter-set) "mh-customize" "\
162 Construct toolbar for `mh-letter-mode'." nil nil)
163
164 (autoload (quote mh-tool-bar-folder-set) "mh-customize" "\
165 Construct toolbar for `mh-folder-mode'." nil nil)
166
167 ;;;*** 163 ;;;***
168 164
169 ;;;### (autoloads (mh-goto-cur-msg mh-update-sequences mh-folder-line-matches-show-buffer-p) 165 ;;;### (autoloads (mh-goto-cur-msg mh-update-sequences mh-folder-line-matches-show-buffer-p)
170 ;;;;;; "mh-e" "mh-e.el" (15934 48879)) 166 ;;;;;; "mh-e" "mh-e.el" (16040 30321))
171 ;;; Generated autoloads from mh-e.el 167 ;;; Generated autoloads from mh-e.el
172 168
173 (autoload (quote mh-folder-line-matches-show-buffer-p) "mh-e" "\ 169 (autoload (quote mh-folder-line-matches-show-buffer-p) "mh-e" "\
174 Return t if the message under point in folder-mode is in the show buffer. 170 Return t if the message under point in folder-mode is in the show buffer.
175 Return nil in any other circumstance (no message under point, no show buffer, 171 Return nil in any other circumstance (no message under point, no show buffer,
184 When optional argument MINIMAL-CHANGES-FLAG is non-nil, the function doesn't 180 When optional argument MINIMAL-CHANGES-FLAG is non-nil, the function doesn't
185 recenter the folder buffer." nil nil) 181 recenter the folder buffer." nil nil)
186 182
187 ;;;*** 183 ;;;***
188 184
189 ;;;### (autoloads (mh-prefix-help mh-help mh-store-buffer mh-store-msg 185 ;;;### (autoloads (mh-prefix-help mh-help mh-ephem-message mh-store-buffer
190 ;;;;;; mh-undo-folder mh-sort-folder mh-print-msg mh-page-digest-backwards 186 ;;;;;; mh-store-msg mh-undo-folder mh-sort-folder mh-print-msg mh-page-digest-backwards
191 ;;;;;; mh-page-digest mh-pipe-msg mh-pack-folder mh-list-folders 187 ;;;;;; mh-page-digest mh-pipe-msg mh-pack-folder mh-list-folders
192 ;;;;;; mh-kill-folder mh-copy-msg mh-burst-digest) "mh-funcs" "mh-funcs.el" 188 ;;;;;; mh-kill-folder mh-copy-msg mh-burst-digest) "mh-funcs" "mh-funcs.el"
193 ;;;;;; (15923 15465)) 189 ;;;;;; (16039 39632))
194 ;;; Generated autoloads from mh-funcs.el 190 ;;; Generated autoloads from mh-funcs.el
195 191
196 (autoload (quote mh-burst-digest) "mh-funcs" "\ 192 (autoload (quote mh-burst-digest) "mh-funcs" "\
197 Burst apart the current message, which should be a digest. 193 Burst apart the current message, which should be a digest.
198 The message is replaced by its table of contents and the messages from the 194 The message is replaced by its table of contents and the messages from the
199 digest are inserted into the folder after that message." t nil) 195 digest are inserted into the folder after that message." t nil)
200 196
201 (autoload (quote mh-copy-msg) "mh-funcs" "\ 197 (autoload (quote mh-copy-msg) "mh-funcs" "\
202 Copy the specified MSG-OR-SEQ to another FOLDER without deleting them. 198 Copy the specified MSG-OR-SEQ to another FOLDER without deleting them.
203 Default is the displayed message. If optional prefix argument is provided, 199 Default is the displayed message.
204 then prompt for the message sequence." t nil) 200 If optional prefix argument is provided, then prompt for the message sequence.
201 If variable `transient-mark-mode' is non-nil and the mark is active, then the
202 selected region is copied.
203 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
204 region in a cons cell, or a sequence." t nil)
205 205
206 (autoload (quote mh-kill-folder) "mh-funcs" "\ 206 (autoload (quote mh-kill-folder) "mh-funcs" "\
207 Remove the current folder and all included messages. 207 Remove the current folder and all included messages.
208 Removes all of the messages (files) within the specified current folder, 208 Removes all of the messages (files) within the specified current folder,
209 and then removes the folder (directory) itself." t nil) 209 and then removes the folder (directory) itself." t nil)
227 227
228 (autoload (quote mh-page-digest-backwards) "mh-funcs" "\ 228 (autoload (quote mh-page-digest-backwards) "mh-funcs" "\
229 Back up displayed message to previous digested message." t nil) 229 Back up displayed message to previous digested message." t nil)
230 230
231 (autoload (quote mh-print-msg) "mh-funcs" "\ 231 (autoload (quote mh-print-msg) "mh-funcs" "\
232 Print MSG-OR-SEQ (default: displayed message) on printer. 232 Print MSG-OR-SEQ on printer.
233 If optional prefix argument provided, then prompt for the message sequence. 233 Default is the displayed message.
234 If optional prefix argument is provided, then prompt for the message sequence.
235 If variable `transient-mark-mode' is non-nil and the mark is active, then the
236 selected region is printed.
237 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
238 region in a cons cell, or a sequence.
239
234 The variable `mh-lpr-command-format' is used to generate the print command. 240 The variable `mh-lpr-command-format' is used to generate the print command.
235 The messages are formatted by mhl. See the variable `mhl-formfile'." t nil) 241 The messages are formatted by mhl. See the variable `mhl-formfile'." t nil)
236 242
237 (autoload (quote mh-sort-folder) "mh-funcs" "\ 243 (autoload (quote mh-sort-folder) "mh-funcs" "\
238 Sort the messages in the current folder by date. 244 Sort the messages in the current folder by date.
254 Store the file(s) contained in the current buffer into DIRECTORY. 260 Store the file(s) contained in the current buffer into DIRECTORY.
255 The buffer can contain a shar file or uuencoded file. 261 The buffer can contain a shar file or uuencoded file.
256 Default directory is the last directory used, or initially the value of 262 Default directory is the last directory used, or initially the value of
257 `mh-store-default-directory' or the current directory." t nil) 263 `mh-store-default-directory' or the current directory." t nil)
258 264
265 (autoload (quote mh-ephem-message) "mh-funcs" "\
266 Display STRING in the minibuffer momentarily." nil nil)
267
259 (autoload (quote mh-help) "mh-funcs" "\ 268 (autoload (quote mh-help) "mh-funcs" "\
260 Display cheat sheet for the MH-Folder commands in minibuffer." t nil) 269 Display cheat sheet for the MH-Folder commands in minibuffer." t nil)
261 270
262 (autoload (quote mh-prefix-help) "mh-funcs" "\ 271 (autoload (quote mh-prefix-help) "mh-funcs" "\
263 Display cheat sheet for the commands of the current prefix in minibuffer." t nil) 272 Display cheat sheet for the commands of the current prefix in minibuffer." t nil)
264 273
265 ;;;*** 274 ;;;***
266 275
267 ;;;### (autoloads (mh-insert-identity mh-identity-list-set mh-identity-make-menu) 276 ;;;### (autoloads (mh-insert-identity mh-identity-list-set mh-identity-make-menu)
268 ;;;;;; "mh-identity" "mh-identity.el" (15900 46388)) 277 ;;;;;; "mh-identity" "mh-identity.el" (16039 39644))
269 ;;; Generated autoloads from mh-identity.el 278 ;;; Generated autoloads from mh-identity.el
270 279
271 (autoload (quote mh-identity-make-menu) "mh-identity" "\ 280 (autoload (quote mh-identity-make-menu) "mh-identity" "\
272 Build (or rebuild) the Identity menu (e.g. after the list is modified)." nil nil) 281 Build (or rebuild) the Identity menu (e.g. after the list is modified)." nil nil)
273 282
281 Insert proper fields for given IDENTITY. 290 Insert proper fields for given IDENTITY.
282 Edit the `mh-identity-list' variable to define identity." t nil) 291 Edit the `mh-identity-list' variable to define identity." t nil)
283 292
284 ;;;*** 293 ;;;***
285 294
286 ;;;### (autoloads (mh-namazu-execute-search mh-swish++-execute-search 295 ;;;### (autoloads (mh-inc-spool-list-set) "mh-inc" "mh-inc.el" (16040
287 ;;;;;; mh-swish-execute-search mh-glimpse-execute-search mh-index-execute-commands 296 ;;;;;; 51164))
288 ;;;;;; mh-index-visit-folder mh-index-delete-folder-headers mh-index-insert-folder-headers 297 ;;; Generated autoloads from mh-inc.el
298
299 (autoload (quote mh-inc-spool-list-set) "mh-inc" "\
300 Set-default SYMBOL to VALUE to update the `mh-inc-spool-list' variable.
301 Also rebuilds the user commands.
302 This is called after 'customize is used to alter `mh-inc-spool-list'." nil nil)
303
304 ;;;***
305
306 ;;;### (autoloads (mh-index-choose mh-namazu-execute-search mh-swish++-execute-search
307 ;;;;;; mh-swish-execute-search mh-index-new-messages mh-glimpse-execute-search
308 ;;;;;; mh-index-execute-commands mh-index-update-unseen mh-index-visit-folder
309 ;;;;;; mh-index-delete-folder-headers mh-index-group-by-folder mh-index-insert-folder-headers
289 ;;;;;; mh-index-previous-folder mh-index-next-folder mh-index-parse-search-regexp 310 ;;;;;; mh-index-previous-folder mh-index-next-folder mh-index-parse-search-regexp
290 ;;;;;; mh-index-do-search mh-index-search mh-index-update-maps) 311 ;;;;;; mh-index-do-search mh-index-search mh-index-update-maps)
291 ;;;;;; "mh-index" "mh-index.el" (15924 45743)) 312 ;;;;;; "mh-index" "mh-index.el" (16038 15647))
292 ;;; Generated autoloads from mh-index.el 313 ;;; Generated autoloads from mh-index.el
293 314
294 (autoload (quote mh-index-update-maps) "mh-index" "\ 315 (autoload (quote mh-index-update-maps) "mh-index" "\
295 Annotate all as yet unannotated messages in FOLDER with their MD5 hash. 316 Annotate all as yet unannotated messages in FOLDER with their MD5 hash.
296 As a side effect msg -> checksum map is updated. Optional argument ORIGIN-MAP 317 As a side effect msg -> checksum map is updated. Optional argument ORIGIN-MAP
298 folder and message from whence it was copied. If present the 319 folder and message from whence it was copied. If present the
299 checksum -> (origin-folder, origin-index) map is updated too." nil nil) 320 checksum -> (origin-folder, origin-index) map is updated too." nil nil)
300 321
301 (autoload (quote mh-index-search) "mh-index" "\ 322 (autoload (quote mh-index-search) "mh-index" "\
302 Perform an indexed search in an MH mail folder. 323 Perform an indexed search in an MH mail folder.
324 Use a prefix argument to repeat the search, as in REDO-SEARCH-FLAG below.
303 325
304 If REDO-SEARCH-FLAG is non-nil and the current folder buffer was generated by a 326 If REDO-SEARCH-FLAG is non-nil and the current folder buffer was generated by a
305 index search, then the search is repeated. Otherwise, FOLDER is searched with 327 index search, then the search is repeated. Otherwise, FOLDER is searched with
306 SEARCH-REGEXP and the results are presented in an MH-E folder. If FOLDER is 328 SEARCH-REGEXP and the results are presented in an MH-E folder. If FOLDER is
307 \"+\" then mail in all folders are searched. Optional argument WINDOW-CONFIG 329 \"+\" then mail in all folders are searched. Optional argument WINDOW-CONFIG
308 stores the window configuration that will be restored after the user quits the 330 stores the window configuration that will be restored after the user quits the
309 folder containing the index search results. 331 folder containing the index search results. If optional argument UNSEEN-FLAG
332 is non-nil, then all the messages are marked as unseen.
310 333
311 Four indexing programs are supported; if none of these are present, then grep 334 Four indexing programs are supported; if none of these are present, then grep
312 is used. This function picks the first program that is available on your 335 is used. This function picks the first program that is available on your
313 system. If you would prefer to use a different program, set the customization 336 system. If you would prefer to use a different program, set the customization
314 variable `mh-index-program' accordingly. 337 variable `mh-index-program' accordingly.
356 Jump to the previous folder marker." t nil) 379 Jump to the previous folder marker." t nil)
357 380
358 (autoload (quote mh-index-insert-folder-headers) "mh-index" "\ 381 (autoload (quote mh-index-insert-folder-headers) "mh-index" "\
359 Annotate the search results with original folder names." nil nil) 382 Annotate the search results with original folder names." nil nil)
360 383
384 (autoload (quote mh-index-group-by-folder) "mh-index" "\
385 Partition the messages based on source folder.
386 Returns an alist with the the folder names in the car and the cdr being the
387 list of messages originally from that folder." nil nil)
388
361 (autoload (quote mh-index-delete-folder-headers) "mh-index" "\ 389 (autoload (quote mh-index-delete-folder-headers) "mh-index" "\
362 Delete the folder headers." nil nil) 390 Delete the folder headers." nil nil)
363 391
364 (autoload (quote mh-index-visit-folder) "mh-index" "\ 392 (autoload (quote mh-index-visit-folder) "mh-index" "\
365 Visit original folder from where the message at point was found." t nil) 393 Visit original folder from where the message at point was found." t nil)
394
395 (autoload (quote mh-index-update-unseen) "mh-index" "\
396 Remove counterpart of MSG in source folder from `mh-unseen-seq'.
397 Also `mh-update-unseen' is called in the original folder, if we have it open." nil nil)
366 398
367 (autoload (quote mh-index-execute-commands) "mh-index" "\ 399 (autoload (quote mh-index-execute-commands) "mh-index" "\
368 Delete/refile the actual messages. 400 Delete/refile the actual messages.
369 The copies in the searched folder are then deleted/refiled to get the desired 401 The copies in the searched folder are then deleted/refiled to get the desired
370 result. Before deleting the messages we make sure that the message being 402 result. Before deleting the messages we make sure that the message being
400 daily from cron: 432 daily from cron:
401 433
402 glimpseindex -H /home/user/Mail/.glimpse /home/user/Mail 434 glimpseindex -H /home/user/Mail/.glimpse /home/user/Mail
403 435
404 FOLDER-PATH is the directory in which SEARCH-REGEXP is used to search." nil nil) 436 FOLDER-PATH is the directory in which SEARCH-REGEXP is used to search." nil nil)
437
438 (autoload (quote mh-index-new-messages) "mh-index" "\
439 Display new messages.
440 All messages in the `mh-unseen-seq' sequence from FOLDERS are displayed.
441 By default the folders specified by `mh-index-new-messages-folders' are
442 searched. With a prefix argument, enter a space-separated list of folders, or
443 nothing to search all folders." t nil)
405 444
406 (autoload (quote mh-swish-execute-search) "mh-index" "\ 445 (autoload (quote mh-swish-execute-search) "mh-index" "\
407 Execute swish-e and read the results. 446 Execute swish-e and read the results.
408 447
409 In the examples below, replace /home/user/Mail with the path to your MH 448 In the examples below, replace /home/user/Mail with the path to your MH
513 mknmz -f /home/user/Mail/.namazu/mknmzrc -O /home/user/Mail/.namazu \\ 552 mknmz -f /home/user/Mail/.namazu/mknmzrc -O /home/user/Mail/.namazu \\
514 /home/user/Mail 553 /home/user/Mail
515 554
516 FOLDER-PATH is the directory in which SEARCH-REGEXP is used to search." nil nil) 555 FOLDER-PATH is the directory in which SEARCH-REGEXP is used to search." nil nil)
517 556
557 (autoload (quote mh-index-choose) "mh-index" "\
558 Choose an indexing function.
559 The side-effects of this function are that the variables `mh-indexer',
560 `mh-index-execute-search-function', and `mh-index-next-result-function' are
561 set according to the first indexer in `mh-indexer-choices' present on the
562 system." nil nil)
563
564 ;;;***
565
566 ;;;### (autoloads (mh-junk-whitelist mh-junk-blacklist) "mh-junk"
567 ;;;;;; "mh-junk.el" (16023 25085))
568 ;;; Generated autoloads from mh-junk.el
569
570 (autoload (quote mh-junk-blacklist) "mh-junk" "\
571 Blacklist MSG-OR-SEQ as spam.
572 Default is the displayed message.
573 If optional prefix argument is provided, then prompt for the message sequence.
574 If variable `transient-mark-mode' is non-nil and the mark is active, then the
575 selected region is blacklisted.
576 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
577 region in a cons cell, or a sequence.
578
579 First the appropriate function is called depending on the value of
580 `mh-junk-choice'. Then if `mh-junk-mail-folder' is a string then the message is
581 refiled to that folder. If nil, the message is deleted.
582
583 To change the spam program being used, customize `mh-junk-program'. Directly
584 setting `mh-junk-choice' is not recommended.
585
586 The documentation for the following functions describes what setup is needed
587 for the different spam fighting programs:
588
589 - `mh-bogofilter-blacklist'
590 - `mh-spamprobe-blacklist'
591 - `mh-spamassassin-blacklist'" t nil)
592
593 (autoload (quote mh-junk-whitelist) "mh-junk" "\
594 Whitelist MSG-OR-SEQ incorrectly classified as spam.
595 Default is the displayed message.
596 If optional prefix argument is provided, then prompt for the message sequence.
597 If variable `transient-mark-mode' is non-nil and the mark is active, then the
598 selected region is whitelisted.
599 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
600 region in a cons cell, or a sequence.
601
602 First the appropriate function is called depending on the value of
603 `mh-junk-choice'. Then the message is refiled to `mh-inbox'.
604
605 To change the spam program being used, customize `mh-junk-program'. Directly
606 setting `mh-junk-choice' is not recommended." t nil)
607
518 ;;;*** 608 ;;;***
519 609
520 ;;;### (autoloads (mh-mime-inline-part mh-mime-save-part mh-push-button 610 ;;;### (autoloads (mh-mime-inline-part mh-mime-save-part mh-push-button
521 ;;;;;; mh-press-button mh-mime-display mh-mime-save-parts mh-display-emphasis 611 ;;;;;; mh-press-button mh-mime-display mh-decode-message-header
522 ;;;;;; mh-display-smileys mh-add-missing-mime-version-header mh-destroy-postponed-handles 612 ;;;;;; mh-mime-save-parts mh-display-emphasis mh-display-smileys
523 ;;;;;; mh-mime-cleanup mh-mml-secure-message-encrypt-pgpmime mh-mml-secure-message-sign-pgpmime 613 ;;;;;; mh-add-missing-mime-version-header mh-destroy-postponed-handles
524 ;;;;;; mh-mml-attach-file mh-mml-forward-message mh-mml-to-mime 614 ;;;;;; mh-mime-cleanup mh-mml-directive-present-p mh-mml-secure-message-encrypt-pgpmime
525 ;;;;;; mh-revert-mhn-edit mh-edit-mhn mh-mhn-compose-forw mh-mhn-compose-external-compressed-tar 615 ;;;;;; mh-mml-secure-message-sign-pgpmime mh-mml-attach-file mh-mml-forward-message
616 ;;;;;; mh-mml-to-mime mh-mhn-directive-present-p mh-revert-mhn-edit
617 ;;;;;; mh-edit-mhn mh-mhn-compose-forw mh-mhn-compose-external-compressed-tar
526 ;;;;;; mh-mhn-compose-anon-ftp mh-mhn-compose-insertion mh-compose-forward 618 ;;;;;; mh-mhn-compose-anon-ftp mh-mhn-compose-insertion mh-compose-forward
527 ;;;;;; mh-compose-insertion) "mh-mime" "mh-mime.el" (15923 15465)) 619 ;;;;;; mh-compose-insertion) "mh-mime" "mh-mime.el" (16039 39680))
528 ;;; Generated autoloads from mh-mime.el 620 ;;; Generated autoloads from mh-mime.el
529 621
530 (autoload (quote mh-compose-insertion) "mh-mime" "\ 622 (autoload (quote mh-compose-insertion) "mh-mime" "\
531 Add a directive to insert a MIME part from a file, using mhn or gnus. 623 Add a directive to insert a MIME part from a file, using mhn or gnus.
532 If the variable `mh-compose-insertion' is set to 'mhn, then that will be used. 624 If the variable `mh-compose-insertion' is set to 'mhn, then that will be used.
589 681
590 Process the current draft with the mhn program, which, using directives 682 Process the current draft with the mhn program, which, using directives
591 already inserted in the draft, fills in all the MIME components and header 683 already inserted in the draft, fills in all the MIME components and header
592 fields. 684 fields.
593 685
594 This step should be done last just before sending the message. 686 This step is performed automatically when sending the message, but this
687 function may be called manually before sending the draft as well.
595 688
596 The `\\[mh-revert-mhn-edit]' command undoes this command. The arguments in the 689 The `\\[mh-revert-mhn-edit]' command undoes this command. The arguments in the
597 list `mh-mhn-args' are passed to mhn if this function is passed an optional 690 list `mh-mhn-args' are passed to mhn if this function is passed an optional
598 prefix argument EXTRA-ARGS. 691 prefix argument EXTRA-ARGS.
599 692
600 For assistance with creating mhn directives to insert various types of 693 For assistance with creating mhn directives to insert various types of
601 components in a message, see \\[mh-mhn-compose-insertion] (generic insertion 694 components in a message, see \\[mh-mhn-compose-insertion] (generic insertion
602 from a file), \\[mh-mhn-compose-anon-ftp] (external reference to file via 695 from a file), \\[mh-mhn-compose-anon-ftp] (external reference to file via
603 anonymous ftp), \\[mh-mhn-compose-external-compressed-tar] (reference to 696 anonymous ftp), \\[mh-mhn-compose-external-compressed-tar] (reference to
604 compressed tar file via anonymous ftp), and \\[mh-mhn-compose-forw] (forward 697 compressed tar file via anonymous ftp), and \\[mh-mhn-compose-forw] (forward
605 message). If these helper functions are used, `mh-edit-mhn' is run 698 message).
606 automatically when the draft is sent.
607 699
608 The value of `mh-edit-mhn-hook' is a list of functions to be called, with no 700 The value of `mh-edit-mhn-hook' is a list of functions to be called, with no
609 arguments, after performing the conversion. 701 arguments, after performing the conversion.
610 702
611 The mhn program is part of MH version 6.8 or later." t nil) 703 The mhn program is part of MH version 6.8 or later." t nil)
612 704
613 (autoload (quote mh-revert-mhn-edit) "mh-mime" "\ 705 (autoload (quote mh-revert-mhn-edit) "mh-mime" "\
614 Undo the effect of \\[mh-edit-mhn] by reverting to the backup file. 706 Undo the effect of \\[mh-edit-mhn] by reverting to the backup file.
615 Optional non-nil argument NOCONFIRM means don't ask for confirmation." t nil) 707 Optional non-nil argument NOCONFIRM means don't ask for confirmation." t nil)
616 708
709 (autoload (quote mh-mhn-directive-present-p) "mh-mime" "\
710 Check if the current buffer has text which might be a MHN directive." nil nil)
711
617 (autoload (quote mh-mml-to-mime) "mh-mime" "\ 712 (autoload (quote mh-mml-to-mime) "mh-mime" "\
618 Compose MIME message from mml directives." t nil) 713 Compose MIME message from mml directives.
714 This step is performed automatically when sending the message, but this
715 function may be called manually before sending the draft as well." t nil)
619 716
620 (autoload (quote mh-mml-forward-message) "mh-mime" "\ 717 (autoload (quote mh-mml-forward-message) "mh-mime" "\
621 Forward a message as attachment. 718 Forward a message as attachment.
622 The function will prompt the user for a DESCRIPTION, a FOLDER and MESSAGE 719 The function will prompt the user for a DESCRIPTION, a FOLDER and MESSAGE
623 number." nil nil) 720 number." nil nil)
638 735
639 (autoload (quote mh-mml-secure-message-encrypt-pgpmime) "mh-mime" "\ 736 (autoload (quote mh-mml-secure-message-encrypt-pgpmime) "mh-mime" "\
640 Add directive to encrypt and sign the entire message. 737 Add directive to encrypt and sign the entire message.
641 If called with a prefix argument DONTSIGN, only encrypt (do NOT sign)." t nil) 738 If called with a prefix argument DONTSIGN, only encrypt (do NOT sign)." t nil)
642 739
740 (autoload (quote mh-mml-directive-present-p) "mh-mime" "\
741 Check if the current buffer has text which may be an MML directive." nil nil)
742
643 (autoload (quote mh-mime-cleanup) "mh-mime" "\ 743 (autoload (quote mh-mime-cleanup) "mh-mime" "\
644 Free the decoded MIME parts." nil nil) 744 Free the decoded MIME parts." nil nil)
645 745
646 (autoload (quote mh-destroy-postponed-handles) "mh-mime" "\ 746 (autoload (quote mh-destroy-postponed-handles) "mh-mime" "\
647 Free MIME data for externally displayed mime parts." nil nil) 747 Free MIME data for externally displayed mime parts." nil nil)
661 If ARG, prompt for directory, else use that specified by the variable 761 If ARG, prompt for directory, else use that specified by the variable
662 `mh-mime-save-parts-default-directory'. These directories may be superseded by 762 `mh-mime-save-parts-default-directory'. These directories may be superseded by
663 mh_profile directives, since this function calls on mhstore or mhn to do the 763 mh_profile directives, since this function calls on mhstore or mhn to do the
664 actual storing." t nil) 764 actual storing." t nil)
665 765
766 (autoload (quote mh-decode-message-header) "mh-mime" "\
767 Decode RFC2047 encoded message header fields." nil nil)
768
666 (autoload (quote mh-mime-display) "mh-mime" "\ 769 (autoload (quote mh-mime-display) "mh-mime" "\
667 Display (and possibly decode) MIME handles. 770 Display (and possibly decode) MIME handles.
668 Optional argument, PRE-DISSECTED-HANDLES is a list of MIME handles. If 771 Optional argument, PRE-DISSECTED-HANDLES is a list of MIME handles. If
669 present they are displayed otherwise the buffer is parsed and then 772 present they are displayed otherwise the buffer is parsed and then
670 displayed." nil nil) 773 displayed." nil nil)
687 Toggle display of the raw MIME part." t nil) 790 Toggle display of the raw MIME part." t nil)
688 791
689 ;;;*** 792 ;;;***
690 793
691 ;;;### (autoloads (mh-do-search mh-pick-do-search mh-do-pick-search 794 ;;;### (autoloads (mh-do-search mh-pick-do-search mh-do-pick-search
692 ;;;;;; mh-search-folder) "mh-pick" "mh-pick.el" (15924 45743)) 795 ;;;;;; mh-search-folder) "mh-pick" "mh-pick.el" (16037 44490))
693 ;;; Generated autoloads from mh-pick.el 796 ;;; Generated autoloads from mh-pick.el
694 797
695 (autoload (quote mh-search-folder) "mh-pick" "\ 798 (autoload (quote mh-search-folder) "mh-pick" "\
696 Search FOLDER for messages matching a pattern. 799 Search FOLDER for messages matching a pattern.
697 This function uses the MH command `pick' to do the work. 800 This function uses the MH command `pick' to do the work.
717 to search the folder. Otherwise if \\[mh-index-search] was used then the 820 to search the folder. Otherwise if \\[mh-index-search] was used then the
718 indexing program specified in `mh-index-program' is used." t nil) 821 indexing program specified in `mh-index-program' is used." t nil)
719 822
720 ;;;*** 823 ;;;***
721 824
722 ;;;### (autoloads (mh-thread-refile mh-thread-delete mh-thread-ancestor 825 ;;;### (autoloads (mh-narrow-to-tick mh-toggle-tick mh-notate-tick
723 ;;;;;; mh-thread-previous-sibling mh-thread-next-sibling mh-thread-forget-message 826 ;;;;;; mh-thread-refile mh-thread-delete mh-thread-ancestor mh-thread-previous-sibling
724 ;;;;;; mh-toggle-threads mh-thread-add-spaces mh-thread-inc mh-delete-subject-or-thread 827 ;;;;;; mh-thread-next-sibling mh-thread-forget-message mh-toggle-threads
828 ;;;;;; mh-thread-add-spaces mh-thread-inc mh-delete-subject-or-thread
725 ;;;;;; mh-delete-subject mh-narrow-to-subject mh-region-to-msg-list 829 ;;;;;; mh-delete-subject mh-narrow-to-subject mh-region-to-msg-list
830 ;;;;;; mh-interactive-msg-or-seq mh-msg-or-seq-to-msg-list mh-iterate-on-msg-or-seq
726 ;;;;;; mh-iterate-on-messages-in-region mh-add-to-sequence mh-notate-cur 831 ;;;;;; mh-iterate-on-messages-in-region mh-add-to-sequence mh-notate-cur
727 ;;;;;; mh-notate-seq mh-map-to-seq-msgs mh-rename-seq mh-widen mh-put-msg-in-seq 832 ;;;;;; mh-notate-seq mh-map-to-seq-msgs mh-rename-seq mh-widen mh-put-msg-in-seq
728 ;;;;;; mh-narrow-to-seq mh-msg-is-in-seq mh-list-sequences mh-delete-seq) 833 ;;;;;; mh-narrow-to-seq mh-msg-is-in-seq mh-list-sequences mh-delete-seq)
729 ;;;;;; "mh-seq" "mh-seq.el" (15923 15465)) 834 ;;;;;; "mh-seq" "mh-seq.el" (16039 39691))
730 ;;; Generated autoloads from mh-seq.el 835 ;;; Generated autoloads from mh-seq.el
731 836
732 (autoload (quote mh-delete-seq) "mh-seq" "\ 837 (autoload (quote mh-delete-seq) "mh-seq" "\
733 Delete the SEQUENCE." t nil) 838 Delete the SEQUENCE." t nil)
734 839
735 (autoload (quote mh-list-sequences) "mh-seq" "\ 840 (autoload (quote mh-list-sequences) "mh-seq" "\
736 List the sequences defined in the folder being visited." t nil) 841 List the sequences defined in the folder being visited." t nil)
737 842
738 (autoload (quote mh-msg-is-in-seq) "mh-seq" "\ 843 (autoload (quote mh-msg-is-in-seq) "mh-seq" "\
739 Display the sequences that contain MESSAGE (default: current message)." t nil) 844 Display the sequences that contain MESSAGE.
845 Default is the displayed message." t nil)
740 846
741 (autoload (quote mh-narrow-to-seq) "mh-seq" "\ 847 (autoload (quote mh-narrow-to-seq) "mh-seq" "\
742 Restrict display of this folder to just messages in SEQUENCE. 848 Restrict display of this folder to just messages in SEQUENCE.
743 Use \\<mh-folder-mode-map>\\[mh-widen] to undo this command." t nil) 849 Use \\<mh-folder-mode-map>\\[mh-widen] to undo this command." t nil)
744 850
745 (autoload (quote mh-put-msg-in-seq) "mh-seq" "\ 851 (autoload (quote mh-put-msg-in-seq) "mh-seq" "\
746 Add MSG-OR-SEQ (default: displayed message) to SEQUENCE. 852 Add MSG-OR-SEQ to SEQUENCE.
747 If optional prefix argument provided, then prompt for the message sequence. 853 Default is the displayed message.
748 If variable `transient-mark-mode' is non-nil and the mark is active, then 854 If optional prefix argument is provided, then prompt for the message sequence.
749 the selected region is added to the sequence." t nil) 855 If variable `transient-mark-mode' is non-nil and the mark is active, then the
856 selected region is added to the sequence.
857 In a program, MSG-OR-SEQ can be a message number, a list of message numbers, a
858 region in a cons cell, or a sequence." t nil)
750 859
751 (autoload (quote mh-widen) "mh-seq" "\ 860 (autoload (quote mh-widen) "mh-seq" "\
752 Remove restrictions from current folder, thereby showing all messages." t nil) 861 Remove restrictions from current folder, thereby showing all messages." t nil)
753 862
754 (autoload (quote mh-rename-seq) "mh-seq" "\ 863 (autoload (quote mh-rename-seq) "mh-seq" "\
776 Iterate over region. 885 Iterate over region.
777 VAR is bound to the message on the current line as we loop starting from BEGIN 886 VAR is bound to the message on the current line as we loop starting from BEGIN
778 till END. In each step BODY is executed. 887 till END. In each step BODY is executed.
779 888
780 If VAR is nil then the loop is executed without any binding." nil (quote macro)) 889 If VAR is nil then the loop is executed without any binding." nil (quote macro))
890
891 (autoload (quote mh-iterate-on-msg-or-seq) "mh-seq" "\
892 Iterate an operation over a region or sequence.
893
894 VAR is bound to each message in turn in a loop over MSG-OR-SEQ, which can be a
895 message number, a list of message numbers, a sequence, or a region in a cons
896 cell. In each iteration, BODY is executed.
897
898 The parameter MSG-OR-SEQ is usually created with `mh-interactive-msg-or-seq'
899 in order to provide a uniform interface to MH-E functions." nil (quote macro))
900
901 (autoload (quote mh-msg-or-seq-to-msg-list) "mh-seq" "\
902 Return a list of messages for MSG-OR-SEQ.
903 MSG-OR-SEQ can be a message number, a list of message numbers, a sequence, or
904 a region in a cons cell." nil nil)
905
906 (autoload (quote mh-interactive-msg-or-seq) "mh-seq" "\
907 Return interactive specification for message, sequence, or region.
908 By convention, the name of this argument is msg-or-seq.
909
910 If variable `transient-mark-mode' is non-nil and the mark is active, then this
911 function returns a cons-cell of the region.
912 If optional prefix argument provided, then prompt for message sequence with
913 SEQUENCE-PROMPT and return sequence.
914 Otherwise, the message number at point is returned.
915
916 This function is usually used with `mh-iterate-on-msg-or-seq' in order to
917 provide a uniform interface to MH-E functions." nil nil)
781 918
782 (autoload (quote mh-region-to-msg-list) "mh-seq" "\ 919 (autoload (quote mh-region-to-msg-list) "mh-seq" "\
783 Return a list of messages within the region between BEGIN and END." nil nil) 920 Return a list of messages within the region between BEGIN and END." nil nil)
784 921
785 (autoload (quote mh-narrow-to-subject) "mh-seq" "\ 922 (autoload (quote mh-narrow-to-subject) "mh-seq" "\
827 Mark current message and all its children for subsequent deletion." t nil) 964 Mark current message and all its children for subsequent deletion." t nil)
828 965
829 (autoload (quote mh-thread-refile) "mh-seq" "\ 966 (autoload (quote mh-thread-refile) "mh-seq" "\
830 Mark current message and all its children for refiling to FOLDER." t nil) 967 Mark current message and all its children for refiling to FOLDER." t nil)
831 968
969 (autoload (quote mh-notate-tick) "mh-seq" "\
970 Highlight current line if MSG is in TICKED-MSGS.
971 If optional argument IGNORE-NARROWING is non-nil then highlighting is carried
972 out even if folder is narrowed to `mh-tick-seq'." nil nil)
973
974 (autoload (quote mh-toggle-tick) "mh-seq" "\
975 Toggle tick mark of all messages in region BEGIN to END." t nil)
976
977 (autoload (quote mh-narrow-to-tick) "mh-seq" "\
978 Restrict display of this folder to just messages in `mh-tick-seq'.
979 Use \\<mh-folder-mode-map>\\[mh-widen] to undo this command." t nil)
980
832 ;;;*** 981 ;;;***
833 982
834 ;;;### (autoloads (mh-speed-add-folder mh-speed-invalidate-map mh-speed-flists 983 ;;;### (autoloads (mh-speed-add-folder mh-speed-invalidate-map mh-speed-flists
835 ;;;;;; mh-speed-view mh-speed-toggle mh-folder-speedbar-buttons) 984 ;;;;;; mh-speed-view mh-speed-toggle mh-folder-speedbar-buttons)
836 ;;;;;; "mh-speed" "mh-speed.el" (15933 21584)) 985 ;;;;;; "mh-speed" "mh-speed.el" (16037 44491))
837 ;;; Generated autoloads from mh-speed.el 986 ;;; Generated autoloads from mh-speed.el
838 987
839 (autoload (quote mh-folder-speedbar-buttons) "mh-speed" "\ 988 (autoload (quote mh-folder-speedbar-buttons) "mh-speed" "\
840 Interface function to create MH-E speedbar buffer. 989 Interface function to create MH-E speedbar buffer.
841 BUFFER is the MH-E buffer for which the speedbar buffer is to be created." nil nil) 990 BUFFER is the MH-E buffer for which the speedbar buffer is to be created." nil nil)
852 View folder on current line. 1001 View folder on current line.
853 Optional ARGS are ignored." t nil) 1002 Optional ARGS are ignored." t nil)
854 1003
855 (autoload (quote mh-speed-flists) "mh-speed" "\ 1004 (autoload (quote mh-speed-flists) "mh-speed" "\
856 Execute flists -recurse and update message counts. 1005 Execute flists -recurse and update message counts.
857 If FORCE is non-nil the timer is reset." t nil) 1006 If FORCE is non-nil the timer is reset. If FOLDER is non-nil then flists is run
1007 only for that one folder." t nil)
858 1008
859 (autoload (quote mh-speed-invalidate-map) "mh-speed" "\ 1009 (autoload (quote mh-speed-invalidate-map) "mh-speed" "\
860 Remove FOLDER from various optimization caches." t nil) 1010 Remove FOLDER from various optimization caches." t nil)
861 1011
862 (autoload (quote mh-speed-add-folder) "mh-speed" "\ 1012 (autoload (quote mh-speed-add-folder) "mh-speed" "\
864 The function invalidates the latest ancestor that is present." nil nil) 1014 The function invalidates the latest ancestor that is present." nil nil)
865 1015
866 ;;;*** 1016 ;;;***
867 1017
868 ;;;### (autoloads (mh-get-msg-num mh-goto-address-find-address-at-point) 1018 ;;;### (autoloads (mh-get-msg-num mh-goto-address-find-address-at-point)
869 ;;;;;; "mh-utils" "mh-utils.el" (15924 47279)) 1019 ;;;;;; "mh-utils" "mh-utils.el" (16039 40655))
870 ;;; Generated autoloads from mh-utils.el 1020 ;;; Generated autoloads from mh-utils.el
871 1021
872 (autoload (quote mh-goto-address-find-address-at-point) "mh-utils" "\ 1022 (autoload (quote mh-goto-address-find-address-at-point) "mh-utils" "\
873 Find e-mail address around or before point. 1023 Find e-mail address around or before point.
874 Then search backwards to beginning of line for the start of an e-mail 1024 Then search backwards to beginning of line for the start of an e-mail
883 1033
884 ;;;### (autoloads (mh-alias-add-address-under-point mh-alias-grab-from-field 1034 ;;;### (autoloads (mh-alias-add-address-under-point mh-alias-grab-from-field
885 ;;;;;; mh-alias-add-alias mh-alias-from-has-no-alias-p mh-alias-address-to-alias 1035 ;;;;;; mh-alias-add-alias mh-alias-from-has-no-alias-p mh-alias-address-to-alias
886 ;;;;;; mh-alias-letter-expand-alias mh-alias-minibuffer-confirm-address 1036 ;;;;;; mh-alias-letter-expand-alias mh-alias-minibuffer-confirm-address
887 ;;;;;; mh-read-address mh-alias-reload) "mh-alias" "mh-alias.el" 1037 ;;;;;; mh-read-address mh-alias-reload) "mh-alias" "mh-alias.el"
888 ;;;;;; (15924 45743)) 1038 ;;;;;; (16039 39579))
889 ;;; Generated autoloads from mh-alias.el 1039 ;;; Generated autoloads from mh-alias.el
890 1040
891 (autoload (quote mh-alias-reload) "mh-alias" "\ 1041 (autoload (quote mh-alias-reload) "mh-alias" "\
892 Load MH aliases into `mh-alias-alist'." t nil) 1042 Load MH aliases into `mh-alias-alist'." t nil)
893 1043
902 1052
903 (autoload (quote mh-alias-address-to-alias) "mh-alias" "\ 1053 (autoload (quote mh-alias-address-to-alias) "mh-alias" "\
904 Return the ADDRESS alias if defined, or nil." nil nil) 1054 Return the ADDRESS alias if defined, or nil." nil nil)
905 1055
906 (autoload (quote mh-alias-from-has-no-alias-p) "mh-alias" "\ 1056 (autoload (quote mh-alias-from-has-no-alias-p) "mh-alias" "\
907 Return t is From has no current alias set." nil nil) 1057 Return t is From has no current alias set.
1058 In the exceptional situation where there isn't a From header in the message the
1059 function returns nil." nil nil)
908 1060
909 (autoload (quote mh-alias-add-alias) "mh-alias" "\ 1061 (autoload (quote mh-alias-add-alias) "mh-alias" "\
910 *Add ALIAS for ADDRESS in personal alias file. 1062 *Add ALIAS for ADDRESS in personal alias file.
911 Prompts for confirmation if the address already has an alias. 1063 Prompts for confirmation if the address already has an alias.
912 If the alias is already is use, `mh-alias-add-alias-to-file' will prompt." t nil) 1064 If the alias is already is use, `mh-alias-add-alias-to-file' will prompt." t nil)