branch: externals/posframe commit 093b29a53cbeda6d637ccc9ef4dfc47123e79b9e Author: Feng Shu <tuma...@163.com> Commit: Feng Shu <tuma...@163.com>
posframe-show: Add respect-tab-line argument #61 --- posframe.el | 20 +++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) diff --git a/posframe.el b/posframe.el index 2608e99..f7ed211 100644 --- a/posframe.el +++ b/posframe.el @@ -247,7 +247,8 @@ effect.") keep-ratio override-parameters respect-header-line - respect-mode-line) + respect-mode-line + respect-tab-line) "Create and return a posframe child frame. This posframe's buffer is BUFFER-OR-NAME." (let ((left-fringe (or left-fringe 0)) @@ -266,7 +267,8 @@ This posframe's buffer is BUFFER-OR-NAME." keep-ratio override-parameters respect-header-line - respect-mode-line))) + respect-mode-line + respect-tab-line))) (with-current-buffer buffer ;; Many variables take effect after call `set-window-buffer' (setq-local display-line-numbers nil) @@ -284,6 +286,8 @@ This posframe's buffer is BUFFER-OR-NAME." (setq-local mode-line-format nil)) (unless respect-header-line (setq-local header-line-format nil)) + (unless respect-tab-line + (setq-local tab-line-format nil)) (add-hook 'kill-buffer-hook #'posframe-auto-delete nil t) @@ -345,6 +349,8 @@ This posframe's buffer is BUFFER-OR-NAME." (set-window-parameter posframe-window 'mode-line-format 'none)) (unless respect-header-line (set-window-parameter posframe-window 'header-line-format 'none)) + (unless respect-tab-line + (set-window-parameter posframe-window 'tab-line-format 'none)) (set-window-buffer posframe-window buffer) (set-window-dedicated-p posframe-window t))) posframe--frame))) @@ -374,6 +380,7 @@ This posframe's buffer is BUFFER-OR-NAME." background-color respect-header-line respect-mode-line + respect-tab-line initialize no-properties keep-ratio @@ -462,9 +469,10 @@ derived from the current frame by default, but can be overridden using the FONT, FOREGROUND-COLOR and BACKGROUND-COLOR arguments, respectively. -By default, posframe will display no header-line or mode-line. -In case a header-line or mode-line is desired, users can set -RESPECT-HEADER-LINE or RESPECT-MODE-LINE to t. +By default, posframe will display no header-line, mode-line and +tab-line. In case a header-line, mode-line or tab-line is +desired, users can set RESPECT-HEADER-LINE, RESPECT-MODE-LINE or +RESPECT-TAB-LINE to t. INITIALIZE is a function with no argument. It will run when posframe buffer is first selected with `with-current-buffer' @@ -500,6 +508,7 @@ You can use `posframe-delete-all' to delete all posframes." (background-color (funcall posframe-arghandler buffer-or-name :background-color background-color)) (respect-header-line (funcall posframe-arghandler buffer-or-name :respect-header-line respect-header-line)) (respect-mode-line (funcall posframe-arghandler buffer-or-name :respect-mode-line respect-mode-line)) + (respect-tab-line (funcall posframe-arghandler buffer-or-name :respect-tab-line respect-tab-line)) (initialize (funcall posframe-arghandler buffer-or-name :initialize initialize)) (no-properties (funcall posframe-arghandler buffer-or-name :no-properties no-properties)) (keep-ratio (funcall posframe-arghandler buffer-or-name :keep-ratio keep-ratio)) @@ -559,6 +568,7 @@ You can use `posframe-delete-all' to delete all posframes." :keep-ratio keep-ratio :respect-header-line respect-header-line :respect-mode-line respect-mode-line + :respect-tab-line respect-tab-line :override-parameters override-parameters)) ;; Insert string into the posframe buffer