[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS
From: |
Tak Ota |
Subject: |
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS Emacs] |
Date: |
Mon, 20 May 2002 16:36:13 -0700 (PDT) |
20 May 2002 22:47:05 +0100: Jason Rumney <address@hidden> wrote:
> Christoph, Tak,
>
> Could you please try the following patch, and tell me if it has any
> effect on the problems you reported with sending mail with Gnus and
> Mew and the latest CVS Emacs.
>
>
> *** process.c.~1.373.~ Mon May 20 21:41:59 2002
> --- process.c Mon May 20 22:41:50 2002
> ***************
> *** 4810,4815 ****
> --- 4810,4819 ----
> #ifdef EAGAIN
> || errno == EAGAIN
> #endif
> + #ifdef WSAENOBUFS
> + /* MS-Windows uses WSAENOBUFS for a full buffer. */
> + || errno == WSAENOBUFS
> + #endif
> )
> /* Buffer is full. Wait, accepting input;
> that may allow the program
>
>
> _______________________________________________
> Emacs-devel mailing list
> address@hidden
> http://mail.gnu.org/mailman/listinfo/emacs-devel
Jason,
Unfortunately that did not fix the problem with Mew. Let me know
what other information or trial may help you solve this problem.
-Tak
Debugger entered--Lisp error: (file-error "writing to process" "invalid
argument" #<process mew-smtp-info-mail1.sjc.in.sel.sony.com>)
process-send-region(#<process mew-smtp-info-mail1.sjc.in.sel.sony.com> 9001
10001)
(let ((next ...)) (process-send-region pro cont next) (setq cont next) (setq
i (1+ i)))
(while (and (< cont ...) (not ...) (< i N)) (let (...) (process-send-region
pro cont next) (setq cont next) (setq i ...)))
(let ((cont ...) (sender ...) (inc 1000) (i 0) (N 10)) (set-buffer
(process-buffer pro)) (when (and sender ...) (process-send-string pro ...) (let
... ... ... ...)) (while (and ... ... ...) (let ... ... ... ...))
(mew-smtp-set-cont pnm cont) (if (< cont ...) (let ... ...) (mew-smtp-set-cont
pnm nil) (mew-smtp-set-timer pnm nil) (process-send-string pro ...)))
(save-excursion (let (... ... ... ... ...) (set-buffer ...) (when ... ...
...) (while ... ...) (mew-smtp-set-cont pnm cont) (if ... ... ... ... ...)))
mew-smtp-command-content(#<process mew-smtp-info-mail1.sjc.in.sel.sony.com>
"mew-smtp-info-mail1.sjc.in.sel.sony.com")
funcall(mew-smtp-command-content #<process
mew-smtp-info-mail1.sjc.in.sel.sony.com>
"mew-smtp-info-mail1.sjc.in.sel.sony.com")
(and func (funcall func process pnm))
(cond (next (mew-smtp-set-status pnm next) (setq func ...) (and func ...)
(mew-smtp-set-string pnm nil)) (t (if ... ...) (mew-smtp-recover pnm str)))
(cond ((and ... ...) (setq code ...) (setq next ...) (cond ... ...)) (t nil))
(progn (set-buffer (process-buffer process)) (mew-smtp-set-string pnm str)
(cond (... ... ... ...) (t nil)))
(unwind-protect (progn (set-buffer ...) (mew-smtp-set-string pnm str) (cond
... ...)) (if (get-buffer obuf) (set-buffer obuf)))
(let ((obuf ...)) (unwind-protect (progn ... ... ...) (if ... ...)))
(if (bufferp (process-buffer process)) (let (...) (unwind-protect ... ...)))
(mew-filter (mew-smtp-set-string pnm str) (cond (... ... ... ...) (t nil)))
(let* ((pnm ...) (status ...) (str ...) next func code) (mew-smtp-debug
(upcase status) string) (mew-filter (mew-smtp-set-string pnm str) (cond ...
...)))
mew-smtp-filter(#<process mew-smtp-info-mail1.sjc.in.sel.sony.com> "354 Enter
mail, end with \".\" on a line by itself\n")
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS Emacs], Christoph Conrad, 2002/05/21
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS Emacs], Jason Rumney, 2002/05/19
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS Emacs], Jason Rumney, 2002/05/20
Re: address@hidden: Re: Problem sending bigger mails with CVS Gnus + CVS Emacs], Christoph Conrad, 2002/05/21