From 0e4d25d533dc0d4fff29cb63cf99617bf875dc10 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 20 Dec 2019 20:37:55 -0500 Subject: [PATCH] ui/modeline: prevent cut-off popups #2219 By forcing resized windows to take non-standard modeline height into account. --- modules/ui/modeline/+light.el | 8 -------- modules/ui/modeline/config.el | 9 +++++++++ 2 files changed, 9 insertions(+), 8 deletions(-) diff --git a/modules/ui/modeline/+light.el b/modules/ui/modeline/+light.el index 006688286..923774324 100644 --- a/modules/ui/modeline/+light.el +++ b/modules/ui/modeline/+light.el @@ -68,14 +68,6 @@ side of the modeline, and whose CDR is the right-hand side.") ;; ;;; Helpers -(defvar +modeline--redisplayed-p nil) -(defadvice! modeline-recalculate-height-a (&optional _force &rest _ignored) - "Ensure that window resizing functions take modeline height into account." - :before '(fit-window-to-buffer resize-temp-buffer-window) - (unless +modeline--redisplayed-p - (setq-local +modeline--redisplayed-p t) - (redisplay t))) - ;;; `active' (defvar +modeline--active-window (selected-window)) diff --git a/modules/ui/modeline/config.el b/modules/ui/modeline/config.el index 54e09fff5..337074c27 100644 --- a/modules/ui/modeline/config.el +++ b/modules/ui/modeline/config.el @@ -4,6 +4,15 @@ (load! "+light")) +(defvar +modeline--redisplayed-p nil) +(defadvice! modeline-recalculate-height-a (&optional _force &rest _ignored) + "Ensure that window resizing functions take modeline height into account." + :before '(fit-window-to-buffer resize-temp-buffer-window) + (unless +modeline--redisplayed-p + (setq-local +modeline--redisplayed-p t) + (redisplay t))) + + (use-package! doom-modeline :unless (featurep! +light) :hook (after-init . doom-modeline-mode)