diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2019-01-15 14:08:41 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-01-15 14:09:11 -0800 |
| commit | 2a3bd6798e9670828f0402079fcc116d6d6b042d (patch) | |
| tree | faed45fcd905138435b9100758f5bcc44e60ec3a /lisp/gnus/nnheader.el | |
| parent | 9fc02ff5ea95c31a8d81eabb5634aa135fcd8786 (diff) | |
| download | emacs-2a3bd6798e9670828f0402079fcc116d6d6b042d.tar.gz emacs-2a3bd6798e9670828f0402079fcc116d6d6b042d.tar.bz2 emacs-2a3bd6798e9670828f0402079fcc116d6d6b042d.zip | |
Avoid using obsolete accept-process-output arg
* lisp/gnus/nnheader.el (nnheader-accept-process-output):
* lisp/net/dns.el (dns-query):
* lisp/net/imap.el (imap-wait-for-tag):
* lisp/net/network-stream.el (network-stream-get-response):
* lisp/net/pop3.el (pop3-accept-process-output):
* lisp/obsolete/starttls.el (starttls-negotiate-gnutls)
(starttls-open-stream-gnutls):
* lisp/server.el (server-eval-at):
* lisp/textmodes/ispell.el (ispell-accept-output):
Do not depend on the obsolete milliseconds argument of
accept-process-output.
Diffstat (limited to 'lisp/gnus/nnheader.el')
| -rw-r--r-- | lisp/gnus/nnheader.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el index 5addc005600..7c8673ee1c5 100644 --- a/lisp/gnus/nnheader.el +++ b/lisp/gnus/nnheader.el @@ -1042,12 +1042,7 @@ See `find-file-noselect' for the arguments." ;; When changing this function, consider changing `pop3-accept-process-output' ;; as well. (defun nnheader-accept-process-output (process) - (accept-process-output - process - (truncate nnheader-read-timeout) - (truncate (* (- nnheader-read-timeout - (truncate nnheader-read-timeout)) - 1000)))) + (accept-process-output process nnheader-read-timeout)) (defun nnheader-update-marks-actions (backend-marks actions) (dolist (action actions) |