From: Patrick Drechsler <patrick.drechsler@gmx.net>
Subject: bug in smtp-mail-send-it?
Date: Tue, 03 Feb 2004 17:28:38 +0100 [thread overview]
Message-ID: <m3hdy886vd.fsf@pdrechsler.fqdn.th-h.de> (raw)
Hi,
after todays cvs update I can't seem to send mails anymore :-(
I used a minimal ~/.gnus to find the error but I couldn't track
it down:
--8<------------------------schnipp------------------------->8---
(setq user-mail-address "patrick.drechsler@gmx.net")
(setq user-full-name "Patrick Drechsler")
(setq gnus-posting-styles
'((".*"
(name "Patrick Drechsler")
(address "patrick.drechsler@gmx.net"))))
(setq gnus-select-method '(nntp "news.cis.dfn.de"))
(setq gnus-secondary-select-methods
'((nnml "")
(nntp "news.gnus.org")))
(setq smtpmail-default-smtp-server "mail.gmx.net")
(setq send-mail-function 'smtpmail-send-it)
(setq message-send-mail-function 'smtpmail-send-it)
(setq smtp-debug-info t
smtp-debug-verb t)
--8<------------------------schnapp------------------------->8---
Here's the backtrace:
,----
| Debugger entered--Lisp error: (error "Sending failed; SMTP protocol error")
| signal(error ("Sending failed; SMTP protocol error"))
| error("Sending failed; SMTP protocol error")
| smtpmail-send-it()
| gnus-agent-send-mail()
| funcall(gnus-agent-send-mail)
| (let (default-enable-multibyte-characters) (set-buffer-multibyte nil) (message "Sending via mail...") (funcall (or message-send-mail-real-function message-send-mail-function)))
| (unwind-protect (let (default-enable-multibyte-characters) (set-buffer-multibyte nil) (message "Sending via mail...") (funcall ...)) (set-buffer buffer) (set-buffer-multibyte multibyte))
| (let ((multibyte enable-multibyte-characters) (buffer ...)) (unwind-protect (let ... ... ... ...) (set-buffer buffer) (set-buffer-multibyte multibyte)))
| (if mm-emacs-mule (let (... ...) (unwind-protect ... ... ...)) (let (default-enable-multibyte-characters) (message "Sending via mail...") (funcall ...)))
| (mm-with-unibyte-current-buffer (message "Sending via mail...") (funcall (or message-send-mail-real-function message-send-mail-function)))
| (if (or (not message-send-mail-partially-limit) (< ... message-send-mail-partially-limit) (not ...)) (mm-with-unibyte-current-buffer (message "Sending via mail...") (funcall ...)) (message-send-mail-partially))
| (save-excursion (set-buffer tembuf) (erase-buffer) (insert (with-current-buffer mailbuf ...)) (message-encode-message-body) (save-restriction (message-narrow-to-headers) (when ... ...) (message-remove-header message-ignored-mail-headers t) (let ... ...)) (goto-char (point-max)) (or (= ... 10) (insert 10)) (message-cleanup-headers) (when (save-restriction ... ...) (message-insert-courtesy-copy)) (if (or ... ... ...) (mm-with-unibyte-current-buffer ... ...) (message-send-mail-partially)))
| (unwind-protect (save-excursion (set-buffer tembuf) (erase-buffer) (insert ...) (message-encode-message-body) (save-restriction ... ... ... ...) (goto-char ...) (or ... ...) (message-cleanup-headers) (when ... ...) (if ... ... ...)) (kill-buffer tembuf))
| (let* ((tembuf ...) (case-fold-search nil) (news ...) (mailbuf ...) (message-this-is-mail t) (message-posting-charset ...) (headers message-required-mail-headers)) (save-restriction (message-narrow-to-headers) (if ... ... ...) (let ... ...) (run-hooks ...)) (unwind-protect (save-excursion ... ... ... ... ... ... ... ... ... ...) (kill-buffer tembuf)) (set-buffer mailbuf) (push (quote mail) message-sent-message-via))
| message-send-mail(nil)
| message-send-via-mail(nil)
| funcall(message-send-via-mail nil)
| (setq success (funcall (caddr elem) arg))
| (and (or (not ...) (message-fetch-field "supersedes") (if ... ... ...)) (setq success (funcall ... arg)))
| (if (and (or ... ... ...) (setq success ...)) (progn (setq sent t)))
| (when (and (or ... ... ...) (setq success ...)) (setq sent t))
| (progn (when (and ... ...) (setq sent t)))
| (if (funcall (cadr elem)) (progn (when ... ...)))
| (when (funcall (cadr elem)) (when (and ... ...) (setq sent t)))
| (while (and success (setq elem ...)) (when (funcall ...) (when ... ...)))
| (let ((alist message-send-method-alist) (success t) elem sent dont-barf-on-no-method (message-options message-options)) (message-options-set-recipient) (while (and success ...) (when ... ...)) (unless (or sent ... ...) (error "No methods specified to send by")) (when (or dont-barf-on-no-method ...) (message-do-fcc) (save-excursion ...) (message "Sending...done") (set-buffer-modified-p nil) (delete-auto-save-file-if-necessary t) (message-disassociate-draft) (message-do-send-housekeeping) (message-do-actions message-send-actions) t))
| message-send(nil)
| (and (message-send arg) (buffer-name buf))
| (if (and (message-send arg) (buffer-name buf)) (progn (if message-kill-buffer-on-exit ... ... ...) (message-do-actions actions) t))
| (when (and (message-send arg) (buffer-name buf)) (if message-kill-buffer-on-exit (kill-buffer buf) (bury-buffer buf) (when ... ...)) (message-do-actions actions) t)
| (let ((buf ...) (actions message-exit-actions)) (when (and ... ...) (if message-kill-buffer-on-exit ... ... ...) (message-do-actions actions) t))
| message-send-and-exit(nil)
| call-interactively(message-send-and-exit)
`----
Any ideas?
Patrick
--
When I got my first television set, I stopped caring
so much about having close relationships.
--Andy Warhol
next reply other threads:[~2004-02-03 16:28 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2004-02-03 16:28 Patrick Drechsler [this message]
2004-02-03 16:33 ` Kai Grossjohann
2004-02-03 16:52 ` Patrick Drechsler
[not found] ` <m3vfmoccs8.fsf@pdrechsler.fqdn.th-h.de>
2004-02-03 17:50 ` Patrick Drechsler
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=m3hdy886vd.fsf@pdrechsler.fqdn.th-h.de \
--to=patrick.drechsler@gmx.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).