#10: Fix quoting of window-numbering-assign-func

This commit is contained in:
Nikolaj Schumacher 2016-08-09 20:09:53 +02:00
parent 575ad20354
commit eefbf9453f

View file

@ -162,10 +162,10 @@ windows to numbers."
(let ((windows (window-list nil 0 (frame-first-window))))
(run-hook-with-args 'window-numbering-before-hook windows)
(when window-numbering-assign-func
(mapc `(lambda (window)
(mapc (lambda (window)
(with-selected-window window
(with-current-buffer (window-buffer window)
(let ((num (funcall ,window-numbering-assign-func)))
(let ((num (funcall window-numbering-assign-func)))
(when num
(window-numbering-assign window num))))))
windows))