master 4874490: * lisp/calendar/cal-menu.el (cal-menu-holidays-menu): Use a proper closure

[Stefan Monnier]

branch: master
commit 48744903de305ddd748e7f57a0112b0c2c86dca5
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/calendar/cal-menu.el (cal-menu-holidays-menu): Use a proper closure
---
 lisp/calendar/cal-menu.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/calendar/cal-menu.el b/lisp/calendar/cal-menu.el
index 497f332..ef84bfa 100644
--- a/lisp/calendar/cal-menu.el
+++ b/lisp/calendar/cal-menu.el
@@ -104,9 +104,9 @@
         ;; The bug has since been fixed.
         (dotimes (i 11)
           (push (vector (format "hol-year-%d" i)
-                        `(lambda ()
-                           (interactive)
-                           (holiday-list (+ displayed-year ,(- i 5))))
+                        (lambda ()
+                          (interactive)
+                          (holiday-list (+ displayed-year (- i 5))))
                         :label `(format "For Year %d"
                                        (+ displayed-year ,(- i 5))))
                 l))