refactor(tazjin/emacs): move global-mode-line info into tab-bar

This removes the wonky hack with detecting the bottom right window,
and gives me saner, unified handling of this display in the tab
bar (of which there is only one!)

Change-Id: Id21c6b2472d0c89fc4d000a10a9e90d2ddba86b6
Reviewed-on: https://cl.tvl.fyi/c/depot/+/10165
Reviewed-by: tazjin <tazjin@tvl.su>
Autosubmit: tazjin <tazjin@tvl.su>
Tested-by: BuildkiteCI
This commit is contained in:
Vincent Ambo 2023-11-28 15:30:18 +03:00 committed by clbot
parent a554531e28
commit 84a846a3a2
3 changed files with 7 additions and 39 deletions

View file

@ -119,16 +119,6 @@ the GPG agent correctly."
(run-at-time (password-store-timeout)
nil 'password-store-clear))))
(defun bottom-right-window-p ()
"Determines whether the last (i.e. bottom-right) window of the
active frame is showing the buffer in which this function is
executed."
(let* ((frame (selected-frame))
(right-windows (window-at-side-list frame 'right))
(bottom-windows (window-at-side-list frame 'bottom))
(last-window (car (seq-intersection right-windows bottom-windows))))
(eq (current-buffer) (window-buffer last-window))))
(defhydra mc/mark-more-hydra (:color pink)
("<up>" mc/mmlte--up "Mark previous like this")
("<down>" mc/mmlte--down "Mark next like this")