(require 'mail-utils) ; pick up mail-strip-quoted-names
-(eval-when-compile
- (require 'smtpmail))
-
(autoload 'mail-do-fcc "sendmail")
(defgroup feedmail nil
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
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
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
;; These mean "report errors by mail" and "deliver in background".
(if (null mail-interactive) '("-oem" "-odb")))))
+(declare-function smtpmail-via-smtp "smtpmail"
+ (recipient smtpmail-text-buffer &optional ask-for-password))
+(defvar smtpmail-smtp-server)
+
;; provided by jam@austin.asc.slb.com (James A. McLaughlin);
;; simplified by WJC after more feedmail development;
;; idea (but not implementation) of copying smtpmail trace buffer to