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:
parent
aec44a5be3
commit
a31be116ae
1 changed files with 2 additions and 1 deletions
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue