At Sun, 23 Sep 2012 00:35:27 +0900,
Kazuhiro Ito wrote:
>
> > I'm trying to send a message from the network at my work, and getting these
> > errors:
> >
> > Sending...
> > Warning: defvar ignored because starttls-program is let-bound
> > Warning: defvar ignored because starttls-extra-args is let-bound
> > Opening STARTTLS connection to `mail.messagingengine.com:587'...failed
> > byte-code: Wrong type argument: arrayp, nil
> > Wrong type argument: arrayp, nil
>
> I think above warnings are due to FLIM's bug. FLIM's smtp-send-buffer
> function let-binds starttls-program and starttls-extra-args before
> starttls.el is loaded. Try below code to avoid warnings (sorry, not
> tested), or simply add "(require 'starttls)" in your .wl.
>
> (defadvice smtp-send-buffer (before starttls-fix activate)
> (when smtp-use-starttls
> (require 'starttls)))
>
> But I don't know whether the above code can fix the error.
I agree with the analysis and the solution. Patch FLIM:
diff --git a/smtp.el b/smtp.el
index fe511e9..649020f 100644
--- a/smtp.el
+++ b/smtp.el
@@ -351,6 +351,8 @@ RECIPIENTS is a list of envelope recipient addresses.
BUFFER may be a buffer or a buffer name which contains mail message."
(if smtp-send-by-myself
(smtp-send-buffer-by-myself sender recipients buffer)
+ (when smtp-use-starttls
+ (require 'starttls))
(let* ((server
(if (functionp smtp-server)
(funcall smtp-server sender recipients)
Best,
-- David
--
OpenPGP... 0x99ADB83B5A4478E6
Jabber.... dmjena@jabber.org
Email..... dmaus@ictsoc.deAttachment:
pgpYQKiu3ynLH.pgp
Description: OpenPGP Digital Signature