From: Reiner Steib Date: Thu, 6 Dec 2007 20:04:55 +0000 (+0000) Subject: (gnus-load): Rename local variable to avoid confusion. X-Git-Tag: emacs-pretest-23.0.90~9037 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af5370adb4887d65416f7792476ab47cd9ec92e7;p=emacs.git (gnus-load): Rename local variable to avoid confusion. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index df1865b2767..afcb487bd1e 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2007-12-06 Reiner Steib + + * gnus-start.el (gnus-load): Rename local variable to avoid confusion. + 2007-12-06 D. Goel * gnus-start.el (gnus-load): Fix breakage from last change. diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index 0b8a9cea67d..100c28b9e80 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -2392,11 +2392,11 @@ If FORCE is non-nil, the .newsrc file is read." (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")))