diff options
Diffstat (limited to 'lisp/net/imap.el')
| -rw-r--r-- | lisp/net/imap.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/net/imap.el b/lisp/net/imap.el index bc0e2e609aa..9f43c57ffd3 100644 --- a/lisp/net/imap.el +++ b/lisp/net/imap.el @@ -1918,11 +1918,7 @@ on failure." (unless (< len 10) (setq imap-have-messaged t) (message "imap read: %dk" len)) - (accept-process-output imap-process - (truncate imap-read-timeout) - (truncate (* (- imap-read-timeout - (truncate imap-read-timeout)) - 1000))))) + (accept-process-output imap-process imap-read-timeout))) ;; A process can die _before_ we have processed everything it ;; has to say. Moreover, this can happen in between the call to ;; accept-process-output and the call to process-status in an |