(imap-arrival-filter): Fix test for missing process

buffer.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bfc68ec..9544017 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-10  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@gmx.net>
+
+       * imap.el (imap-arrival-filter): Fix test for missing process
+       buffer.
+
 2003-07-09  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@gmx.net>
        From Gaute B Strokkenes <gs234@cam.ac.uk> (tiny patch).
 

diff --git a/lisp/imap.el b/lisp/imap.el
index 74e581c..c1f460d 100644 (file)
--- a/lisp/imap.el
+++ b/lisp/imap.el
@@ -1789,7 +1789,7 @@ Return nil if no complete line has arrived."
   "IMAP process filter."
   ;; Sometimes, we are called even though the process has died.
   ;; Better abstain from doing stuff in that case.
-  (when (process-buffer proc)
+  (when (buffer-name (process-buffer proc))
     (with-current-buffer (process-buffer proc)
       (goto-char (point-max))
       (insert string)