branch: externals/posframe
commit 16d085eaa43afc50eb6c306b7da2d7465807f841
Author: Feng Shu <tuma...@163.com>
Commit: Feng Shu <tuma...@163.com>
* posframe.el (posframe-show, posframe--create-posframe): move tab-bar code
frome posframe-show to posframe--create-posframe
---
posframe.el | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/posframe.el b/posframe.el
index 48a2185..3148389 100644
--- a/posframe.el
+++ b/posframe.el
@@ -368,10 +368,17 @@ This posframe's buffer is BUFFER-OR-NAME."
(set-window-parameter posframe-window 'header-line-format 'none))
(set-window-buffer posframe-window buffer)
(set-window-dedicated-p posframe-window t)))
+
+ ;; Remove tab-bar always.
+ (set-frame-parameter posframe--frame 'tab-bar-lines 0)
+ (when (version< "27.0" emacs-version)
+ (setq-local tab-line-format nil))
+
;; If user set 'parent-frame to nil after run posframe-show.
;; for cache reason, next call to posframe-show will be affected.
;; so we should force set parent-frame again in this place.
(set-frame-parameter posframe--frame 'parent-frame parent-frame)
+
posframe--frame)))
(defun posframe-arghandler-default (_buffer-or-name _arg-name value)
@@ -636,11 +643,6 @@ You can use `posframe-delete-all' to delete all posframes."
:override-parameters override-parameters
:accept-focus accept-focus))
- ;; Remove tab-bar always.
- (set-frame-parameter posframe 'tab-bar-lines 0)
- (when (version< "27.0" emacs-version)
- (setq-local tab-line-format nil))
-
;; Move mouse to (0 . 0)
(posframe--mouse-banish parent-frame posframe)
