# HG changeset patch
# User Deepak Goel <deego@gnufans.org>
# Date 1196964833 0
# Node ID 9c91533a901a32dfb987736533eaafa4921029bc
# Parent  f358a2fd5895901dd077875c0998dbdbb3ca0ebf
Fix buggy calls to `error'.

diff -r f358a2fd5895 -r 9c91533a901a lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Thu Dec 06 17:56:42 2007 +0000
+++ b/lisp/gnus/ChangeLog	Thu Dec 06 18:13:53 2007 +0000
@@ -1,5 +1,6 @@
 2007-12-06  D. Goel  <deego3@gmail.com>
 
+	* pop3.el (pop3-read-response): Ditto.
 
 	* gnus-art.el (article-make-date-line): Fix buggy call to `error'.
 	* gnus-start.el (gnus-load): Ditto.
diff -r f358a2fd5895 -r 9c91533a901a lisp/gnus/pop3.el
--- a/lisp/gnus/pop3.el	Thu Dec 06 17:56:42 2007 +0000
+++ b/lisp/gnus/pop3.el	Thu Dec 06 18:13:53 2007 +0000
@@ -314,7 +314,7 @@
       (setq match-end (point))
       (goto-char pop3-read-point)
       (if (looking-at "-ERR")
-	  (error (buffer-substring (point) (- match-end 2)))
+	  (error "%s" (buffer-substring (point) (- match-end 2)))
 	(if (not (looking-at "+OK"))
 	    (progn (setq pop3-read-point match-end) nil)
 	  (setq pop3-read-point match-end)