From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 14 Jun 2005 15:15:23 +0000 (+0000)
Subject: (gnus-agent-unlist-expire-days): Follow error conventions.
X-Git-Tag: emacs-pretest-22.0.90~8959
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=401d9d1a51ca2606440aebb5d4030cf90dbedd1a;p=emacs.git

(gnus-agent-unlist-expire-days): Follow error conventions.
---

diff --git a/lisp/gnus/legacy-gnus-agent.el b/lisp/gnus/legacy-gnus-agent.el
index 16b0cf6c89f..50675b0ba27 100644
--- a/lisp/gnus/legacy-gnus-agent.el
+++ b/lisp/gnus/legacy-gnus-agent.el
@@ -25,7 +25,7 @@ converted to the compressed format."
 	      ((file-directory-p member)
 	       (push member search-in))
               ((equal (file-name-nondirectory member) ".agentview")
-               (setq converted-something 
+               (setq converted-something
                      (or (gnus-agent-convert-agentview member)
                          converted-something))))))
 
@@ -175,7 +175,7 @@ converted to the compressed format."
                                   (t
                                    t))))))
         (kill-buffer buffer))
-      (error "Change gnus-agent-expire-days to an integer for gnus to start."))))
+      (error "Change gnus-agent-expire-days to an integer for gnus to start"))))
 
 ;; The gnus-agent-unlist-expire-days has its own conversion prompt.
 ;; Therefore, hide the default prompt.
@@ -198,8 +198,8 @@ possible that the hook was persistently saved."
 
           (when (cond ((eq (type-of func) 'compiled-function)
                        ;; Search def. of compiled function for gnus-agent-do-once string
-                       (let* (definition 
-                               print-level 
+                       (let* (definition
+                               print-level
                                print-length
                                (standard-output
                                 (lambda (char)