diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-08-13 00:42:51 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-08-13 00:42:51 -0700 |
| commit | f0024d8c0dbe5dcb2551bf2433af39ffe7cb8f7a (patch) | |
| tree | 325046b1f3fb9cffa88ac99ce51a16eb5edc0c76 /lisp/mail/feedmail.el | |
| parent | ae3f0661b3baf53dec77c14b9b54530094f09904 (diff) | |
| download | emacs-f0024d8c0dbe5dcb2551bf2433af39ffe7cb8f7a.tar.gz emacs-f0024d8c0dbe5dcb2551bf2433af39ffe7cb8f7a.tar.bz2 emacs-f0024d8c0dbe5dcb2551bf2433af39ffe7cb8f7a.zip | |
Fix some custom types
* lisp/cus-start.el (truncate-partial-width-windows): Fix type.
* lisp/emulation/viper-init.el (viper-search-scroll-threshold): Fix type.
* lisp/mail/feedmail.el (feedmail-confirm-outgoing)
(feedmail-display-full-frame, feedmail-deduce-bcc-where): Fix types.
* admin/admin.el: Related comments.
Diffstat (limited to 'lisp/mail/feedmail.el')
| -rw-r--r-- | lisp/mail/feedmail.el | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index 091b1a03025..7f27599edf2 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -407,8 +407,10 @@ sending immediately. For any other non-nil value, prompt in both cases. You can give a timeout for the prompt; see variable `feedmail-confirm-outgoing-timeout'." :group 'feedmail-misc - :type 'boolean - ) + :type '(choice (const nil) + (const queued) + (const immediate) + (other t))) (defcustom feedmail-display-full-frame 'queued @@ -425,8 +427,10 @@ it can still be interesting to see a lot about them as they are shuttled robotically onward." :version "24.1" :group 'feedmail-misc - :type 'boolean - ) + :type '(choice (const nil) + (const queued) + (const immediate) + (other t))) (defcustom feedmail-confirm-outgoing-timeout nil @@ -483,8 +487,9 @@ and serially, so slow SMTP conversations can add up to a delay. There is an option for either 'first or 'last because you might have a delivery agent that processes the addresses backwards." :group 'feedmail-headers - :type 'boolean - ) + :type '(choice (const nil) + (const first) + (const last))) (defcustom feedmail-fill-to-cc t |