[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master a31be116ae: * lisp/tab-bar.el (tab-bar-new-tab-to): Don't funcall
From: |
Juri Linkov |
Subject: |
master a31be116ae: * lisp/tab-bar.el (tab-bar-new-tab-to): Don't funcall const values. |
Date: |
Sun, 20 Mar 2022 14:59:31 -0400 (EDT) |
branch: master
commit a31be116aeee43b7a2e14d53db226933d4e8a012
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>
* 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.
---
lisp/tab-bar.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index 245a55a671..cf1cca4af3 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master a31be116ae: * lisp/tab-bar.el (tab-bar-new-tab-to): Don't funcall const values.,
Juri Linkov <=