Mercurial > emacs
diff lisp/gnus/gnus-start.el @ 91239:2fcaae6177a5
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-300
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Sun, 16 Dec 2007 05:08:49 +0000 |
| parents | 53108e6cea98 f6f228f943b2 |
| children | 606f2d163a64 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-start.el Fri Dec 14 12:53:04 2007 +0000 +++ b/lisp/gnus/gnus-start.el Sun Dec 16 05:08:49 2007 +0000 @@ -2394,11 +2394,11 @@ (eval form)) (error (unless (eq (car type) 'end-of-file) - (let ((error (format "Error in %s line %d" file - (count-lines (point-min) (point))))) + (let ((errmsg (format "Error in %s line %d" file + (count-lines (point-min) (point))))) (ding) - (unless (gnus-yes-or-no-p (concat error "; continue? ")) - (error "%s" error))))))))) + (unless (gnus-yes-or-no-p (concat errmsg "; continue? ")) + (error "%s" errmsg))))))))) (defun gnus-read-newsrc-el-file (file) (let ((ding-file (concat file "d")))