# HG changeset patch # User Reiner Steib # Date 1196971495 0 # Node ID 11bb5a31a28a449b5701500069dd8787ceeb3f09 # Parent ec50a5656cfe5cb5469a7d262d83f3e26f45d1a3 (gnus-load): Rename local variable to avoid confusion. diff -r ec50a5656cfe -r 11bb5a31a28a lisp/gnus/ChangeLog --- a/lisp/gnus/ChangeLog Thu Dec 06 20:02:02 2007 +0000 +++ b/lisp/gnus/ChangeLog Thu Dec 06 20:04:55 2007 +0000 @@ -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 -r ec50a5656cfe -r 11bb5a31a28a lisp/gnus/gnus-start.el --- a/lisp/gnus/gnus-start.el Thu Dec 06 20:02:02 2007 +0000 +++ b/lisp/gnus/gnus-start.el Thu Dec 06 20:04:55 2007 +0000 @@ -2392,11 +2392,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")))