From: yamaoka <yamaoka>
Date: Mon, 14 Jul 2003 07:59:02 +0000 (+0000)
Subject: Synch to Gnus 200307140803.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=53c5f7830e8ca9e3107b0a3a8bdb7d5ea072cf7b;p=elisp%2Fgnus.git-

Synch to Gnus 200307140803.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e3b6be9..d7b7ad9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-14  Simon Josefsson  <jas@extundo.com>
+
+	* mail-source.el (mail-source-fetch-imap): Don't assume
+	imap-error-text returns something.
+
 2003-07-12  Nevin Kapur  <kapur@mts.jhu.edu>
 
 	* nnimap.el (nnimap-request-newgroups): Use the pattern in
diff --git a/lisp/mail-source.el b/lisp/mail-source.el
index 0045cc3..0ae90a8 100644
--- a/lisp/mail-source.el
+++ b/lisp/mail-source.el
@@ -1031,7 +1031,7 @@ This only works when `display-time' is enabled."
 	(setq mail-source-password-cache
 	      (delq (assoc from mail-source-password-cache)
 		    mail-source-password-cache))
-	(error (imap-error-text buf)))
+	(error "IMAP error: %s" (imap-error-text buf)))
       (kill-buffer buf)
       found)))