* lisp/subr.el (dolist): Don't bind VAR in RESULT.

diff --git a/etc/NEWS b/etc/NEWS
index bb8bcd6cb56c8db008c92b9e9ee808b528532a19..177f91066ac73a2a4a0f0aba46b8a3686c603068 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -28,6 +28,11 @@ so we will look at it and add it to the manual.
 * Changes in Specialized Modes and Packages in Emacs 24.4
 * New Modes and Packages in Emacs 24.4
 * Incompatible Lisp Changes in Emacs 24.4
+
+** `dolist' in lexical-binding mode does not bind VAR in RESULT any more.
+VAR was bound to nil which was not tremendously useful and just lead to
+spurious warnings about an unused var.
+
 * Lisp changes in Emacs 24.4
 
 ** Docstrings can be made dynamic by adding a `dynamic-docstring-function'

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 612cdc33d52ef7fd931f44716cd847a1734397c6..6f10e311eacd46c21ba7ea6c5ff336899068c42a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-11-09  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * subr.el (dolist): Don't bind VAR in RESULT.
+
        * emacs-lisp/advice.el: Miscellaneous cleanup.  Use lexical-binding.
        (fset, documentation): Don't save real def since we don't advise.
        (ad-do-advised-functions): Remove problematic `result-form'.

diff --git a/lisp/subr.el b/lisp/subr.el
index 9c89bd3e04503b6f909d1fbde30134054dbaa35d..0ba932a3efe4a3b8fe33a84147a886934931544e 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -222,9 +222,7 @@ Then evaluate RESULT to get return value, default nil.
              (let ((,(car spec) (car ,temp)))
                ,@body
                (setq ,temp (cdr ,temp))))
-           ,@(if (cdr (cdr spec))
-                 ;; FIXME: This let often leads to "unused var" warnings.
-                 `((let ((,(car spec) nil)) ,@(cdr (cdr spec))))))
+           ,@(cdr (cdr spec)))
       `(let ((,temp ,(nth 1 spec))
              ,(car spec))
          (while ,temp