(Info-insert-dir): Don't quote lambda.

diff --git a/lisp/info.el b/lisp/info.el
index 494570bb50e6d5cb1537a7416e29f0a1846116b3..a4caf19fb62e5468211c52a1341422e0507780ae 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -606,15 +606,15 @@ else defaults to `Top'."
           ;; Verify that none of the files we used has changed
           ;; since we used it.
           (eval (cons 'and
-                      (mapcar '(lambda (elt)
-                                 (let ((curr (file-attributes
-                                              ;; Handle symlinks
-                                              (file-truename (car elt)))))
-
-                                   ;; Don't compare the access time.
-                                   (if curr (setcar (nthcdr 4 curr) 0))
-                                   (setcar (nthcdr 4 (cdr elt)) 0)
-                                   (equal (cdr elt) curr)))
+                      (mapcar (lambda (elt)
+                                (let ((curr (file-attributes
+                                             ;; Handle symlinks
+                                             (file-truename (car elt)))))
+
+                                  ;; Don't compare the access time.
+                                  (if curr (setcar (nthcdr 4 curr) 0))
+                                  (setcar (nthcdr 4 (cdr elt)) 0)
+                                  (equal (cdr elt) curr)))
                               Info-dir-file-attributes))))
       (progn
        (insert Info-dir-contents)