1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-31 04:41:23 -08:00

* lisp/tab-bar.el (tab-bar-new-tab-to): Don't funcall const values.

Filter out the values 'clone' and 'window' of 'tab-bar-new-tab-choice'
from function call.
This commit is contained in:
Juri Linkov 2022-03-20 20:59:04 +02:00
parent aec44a5be3
commit a31be116ae

View file

@ -1384,7 +1384,8 @@ After the tab is created, the hooks in
(split-window) (delete-window))))
(let ((buffer
(if (functionp tab-bar-new-tab-choice)
(if (and (functionp tab-bar-new-tab-choice)
(not (memq tab-bar-new-tab-choice '(clone window))))
(funcall tab-bar-new-tab-choice)
(if (stringp tab-bar-new-tab-choice)
(or (get-buffer tab-bar-new-tab-choice)