toki/emacs-winum
1
0
Fork 0
Code Issues Pull requests Activity

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

Browse source
This commit is contained in:
Nikolaj Schumacher 2016-08-09 20:09:53 +02:00
parent 575ad20354
commit eefbf9453f
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
window-numbering.el
View file

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