floating windows - hide tab-line by default\ntab-line-mode is not functional as is in floating windows so hide the tab-line unless explicitly set in configuration

This commit is contained in:
mitch-kyle 2022-12-09 13:52:56 -04:00
parent 02ffa3359c
commit 2f75d20ad4

View file

@ -299,20 +299,10 @@ context of the corresponding buffer."
(frame-root-window frame))) (frame-root-window frame)))
header-line-format nil))) header-line-format nil)))
(if floating-tab-line ;; Hide tab-line by default but override with floating-tab-line.
(setq exwm--tab-line-format (or exwm--tab-line-format (setq exwm--tab-line-format (or exwm--tab-line-format
tab-line-format) tab-line-format)
tab-line-format floating-tab-line) tab-line-format floating-tab-line)
(if (and (not (plist-member exwm--configurations 'floating-tab-line))
exwm--mwm-hints-decorations)
(when exwm--tab-line-format
(setq tab-line-format exwm--tab-line-format))
;; The mode-line need to be hidden in floating mode.
(setq frame-height (- frame-height (window-tab-line-height
(frame-root-window frame)))
exwm--tab-line-format (or exwm--tab-line-format
tab-line-format)
tab-line-format nil)))
(set-frame-size frame frame-width frame-height t) (set-frame-size frame frame-width frame-height t)
;; Create the frame container as the parent of the frame. ;; Create the frame container as the parent of the frame.