lisp/emacs-lisp/warnings.el (display-warning): Don't quote lambda

(cherry picked from commit 1fdaad525389b6638daa729ef5794ba5e81e3085)

diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el
index 897dbc2ffb7f3c63d39522f22a0c1bea6bfaa429..bd68edae0c54a1f38f4912abb2b31ca30f7aad5f 100644 (file)
--- a/lisp/emacs-lisp/warnings.el
+++ b/lisp/emacs-lisp/warnings.el
@@ -373,9 +373,10 @@ entirely by setting `warning-suppress-types' or
                     (let ((window (display-buffer
                                    buffer
                                    (when warning-display-at-bottom
-                                     '(display-buffer--maybe-at-bottom
-                                       (window-height . (lambda (window)
-                                         (fit-window-to-buffer window 10)))
+                                     `(display-buffer--maybe-at-bottom
+                                       (window-height
+                                        . ,(lambda (window)
+                                             (fit-window-to-buffer window 10)))
                                        (category . warning))))))
                       (when (and window (markerp warning-series)
                                  (eq (marker-buffer warning-series) buffer))