Lines Matching +defs:auto +defs:mode +defs:list
15 ;; mode). See below for a list of additional features, including the
32 ;; but that doesn't correlate well with the list of folks who have
84 ;; In other words, it takes over after you hit "C-c C-c" in mail mode.
89 ;; list, so trolling through the variable and function doc strings may
116 ;; comments are stripped in the simplified address list given
125 ;; list
132 ;; After a long list of options below, you will find the function
148 ;; (setq auto-mode-alist (cons '("\\.fqm$" . mail-mode) auto-mode-alist))
151 ;; like to add the suffix ".fqm" to the list of non-saved things via the variable
170 ;; If you are using message-mode to compose and send mail, feedmail will
219 ;; deduced address list now really a list, not a string (API change)
225 ;; try to clean up some pesky auto-save files from the
243 ;; option to control writing in text vs binary mode
245 ;; reliable re-editing of text-mode (vs binary) queued messages
249 ;; feedmail-deduce-address list)
271 ;; feedmail-fiddle-plex-user-list
277 ;; feedmail-queue-auto-file-nuke
357 list. You may want to leave them in if you're using sendmail
367 address list. You may want to leave them in if you're using sendmail
375 "*Where Bcc:/Resent-Bcc: addresses should appear in the envelope list.
378 up in the list of deduced addresses in the order that the headers
381 Bcc:/Resent-Bcc: addresses will appear at the beginning in the list;
383 at the end of the list.
502 nil, writing will be in text mode. On systems where there is no
696 (defcustom feedmail-fiddle-plex-user-list nil
697 "If non-nil, should be a list of one or more fiddle-plexes.
698 Each element of the list can also be a function which returns a
701 feedmail will use this list of fiddle-plexes to manipulate user-specified
717 feedmail normally accumulates a list of addressees and passes the message
718 along with that list to a buffer-eating function which expects any number
720 repeatedly call the same buffer-eating function. Each time, the list of
721 addressees will be just one item from the original list. This only affects
725 Spray mode is usually pointless, and if you can't think of a good reason for
730 which see `feedmail-spray-address-fiddle-plex-list'.
739 "Do not set or change this variable. See `feedmail-spray-address-fiddle-plex-list'.")
741 (defcustom feedmail-spray-address-fiddle-plex-list nil
743 When spraying is enabled, feedmail composes a list of envelope addresses.
764 May be a list of any combination of the foregoing and fiddle-plexes. (A
766 nested inside another list to avoid ambiguity.) If a list, each item
771 (setq feedmail-spray-address-fiddle-plex-list 'my-address-embellisher)
773 The idea of the example is that, during spray mode, as each message is
782 stripped addresses, if desired; (4) define `feedmail-spray-address-fiddle-plex-list'
802 queued in their raw state as they appear in the mail-mode buffer and
805 mail-mode or whatever). If you visit a file in the queue directory
994 takes one argument, a list of the files in the queue directory. It
996 them in the list when reordering it; they get skipped over later.
1107 (defcustom feedmail-queue-auto-file-nuke nil
1110 immediate mode (i.e., not when you're running the queue) and will ask if
1123 (defvar feedmail-address-list nil)
1171 (insert (mapconcat 'identity feedmail-address-list " "))
1183 of the message, ready to go; (2) `feedmail-address-list' contains a list
1185 subprocess (the hook may change the list); (3) `feedmail-error-buffer'
1201 message, ready to go; (2) `feedmail-address-list' contains a list of
1211 (defcustom feedmail-queue-runner-mode-setter
1212 '(lambda (&optional arg) (mail-mode))
1213 "*A function to set the proper mode of a message file.
1218 Most people want `mail-mode', so the default value is an anonymous
1250 want `mail-send-and-exit' (bound to C-c C-c in mail-mode), but here's
1292 directed; and (3) a list containing the addresses individually as
1308 gets replaced by the space-separated, simplified list of addressees.
1331 (append (list (point-min) (point-max) "/bin/sh" nil errors-to nil "-c"
1342 (append (list (point-min) (point-max)
1354 (list "-f" user-mail-address)
1385 (buffer-list))))))
1391 It is a list of up to 4 elements: NAME, VALUE, ACTION, FOLDING. The element
1392 VALUE can also be a list sometimes.
1399 as described below for ACTION `combine', a list of up to three values.
1411 In this case, VALUE has a special form. It is a list
1468 ;; From a VM mailing list discussion and some suggestions from Samuel Mikes <smikes@alumni.hmc.edu>
1553 Return value is a list of three things: number of messages sent, number of
1575 (list-of-possible-fqms))
1588 (setq list-of-possible-fqms (directory-files feedmail-queue-directory t))
1590 (setq list-of-possible-fqms (funcall feedmail-queue-run-orderer list-of-possible-fqms)))
1640 (funcall feedmail-queue-runner-mode-setter arg)
1665 list-of-possible-fqms)))
1673 (list messages-sent messages-skipped q-oth)))
1685 after-immediate (a message has just been sent in immediate mode)
1810 * SPRAY toggle spray mode (individual message transmissions)
1827 (save-excursion (set-buffer standard-output) (if (fboundp 'help-mode) (help-mode)))))
1831 Result is a list containing a count of queued messages in the
1852 (list q-cnt q-oth high-water)))
1947 (let ((a-s-file-name buffer-auto-save-file-name))
1948 ;; be aggressive in nuking auto-save files
1950 delete-auto-save-files
1981 (feedmail-address-list)
2041 (setq feedmail-address-list (feedmail-deduce-address-list feedmail-prepped-text-buffer (point-min) eoh-marker addr-regexp feedmail-address-list))))
2046 (setq feedmail-address-list (feedmail-deduce-address-list feedmail-prepped-text-buffer (point-min) eoh-marker addr-regexp feedmail-address-list)))
2049 (setq feedmail-address-list (feedmail-deduce-address-list feedmail-prepped-text-buffer (point-min) eoh-marker addr-regexp feedmail-address-list))))
2053 (setq feedmail-address-list (feedmail-deduce-address-list feedmail-prepped-text-buffer (point-min) eoh-marker addr-regexp feedmail-address-list))))
2054 (if (not feedmail-address-list) (error "FQM: Sending...abandoned, no addressees"))
2056 (setq feedmail-address-list (nreverse feedmail-address-list))
2076 (feedmail-fiddle-list-of-fiddle-plexes feedmail-fiddle-plex-user-list)
2100 (if (or feedmail-queue-auto-file-nuke
2233 (feedmail-fiddle-list-of-spray-fiddle-plexes feedmail-spray-address-fiddle-plex-list)
2241 (list feedmail-spray-this-address))))
2244 feedmail-address-list)
2248 feedmail-address-list))))
2257 (let ((from-list))
2258 (setq from-list
2259 (feedmail-deduce-address-list
2261 from-list))
2262 (if (not from-list)
2263 (setq from-list
2264 (feedmail-deduce-address-list
2266 from-list)))
2267 (if (and from-list (car from-list)) (car from-list) user-mail-address))))
2272 ;; default is to fall off the end of the list and do nothing
2293 (let ((feedmail-from-line (list "ignored" feedmail-from-line 'create)))
2301 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2312 ;; default is to fall off the end of the list and do nothing
2321 (let ((feedmail-sender-line (list "ignored" feedmail-sender-line 'create)))
2329 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2349 ;; default is to fall off the end of the list and do nothing
2360 (let ((feedmail-date-generator (list "ignored" feedmail-date-generator 'create)))
2368 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2399 ;; default is to fall off the end of the list and do nothing
2410 (let ((feedmail-message-id-generator (list "ignored" feedmail-message-id-generator 'create)))
2418 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2440 ;; default is to fall off the end of the list and do nothing
2449 (let ((feedmail-x-mailer-line (list "ignored" (list feedmail-x-mailer-line ";\n\t%s") 'combine)))
2457 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2468 ;; default is to fall off the end of the list and do nothing
2474 (let ((addy-plex (list "To" feedmail-spray-this-address)))
2480 (let ((addy-plex (list addy-plex feedmail-spray-this-address)))
2488 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2497 (defun feedmail-fiddle-list-of-spray-fiddle-plexes (list-of-fiddle-plexes)
2498 "Fiddling based on a list of fiddle-plexes for spraying."
2499 ;; default is to fall off the end of the list and do nothing
2500 (let ((lofp list-of-fiddle-plexes) fp)
2509 (defun feedmail-fiddle-list-of-fiddle-plexes (list-of-fiddle-plexes)
2510 "Fiddling based on a list of fiddle-plexes. Values t, nil, and string are pointless."
2511 ;; default is to fall off the end of the list and do nothing
2512 (let ((lofp list-of-fiddle-plexes) fp)
2520 (let ((lofp (list (funcall fp)))) (feedmail-fiddle-list-of-fiddle-plexes lofp)))
2522 ;; if it's a list, it must be a fiddle-plex -- so fiddle, man, fiddle
2607 (defun feedmail-deduce-address-list (message-buffer header-start header-end addr-regexp address-list)
2608 "Get address list with all comments and other excitement trimmed.
2610 argument. Returns a list of strings. Duplicate addresses will have
2636 (if (not (member simple-address address-list))
2637 (add-to-list 'address-list simple-address)))
2640 (identity address-list)))