From 2c062dfdf50970766db179ccbad7ce71c541cd72 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Wed, 30 Oct 2024 20:32:28 +0200 Subject: [PATCH] Call tab-bar-tab-post-open-functions during tabs initialization * lisp/tab-bar.el (tab-bar-tabs): Run the hook 'tab-bar-tab-post-open-functions' after creating the first tab in the selected frame's tab-bar list of tabs (bug#74087). Suggested by Ship Mints . --- lisp/tab-bar.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index 2efc2b8f85b..7fc04ab3c32 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el @@ -803,7 +803,9 @@ Return its existing value or a new value." (funcall tab-bar-tab-name-function)))) ;; Create default tabs (setq tabs (list (tab-bar--current-tab-make))) - (tab-bar-tabs-set tabs frame)) + (tab-bar-tabs-set tabs frame) + (run-hook-with-args 'tab-bar-tab-post-open-functions + (car tabs))) tabs)) (defun tab-bar-tabs-set (tabs &optional frame)