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:
parent
a554531e28
commit
84a846a3a2
3 changed files with 7 additions and 39 deletions
|
|
@ -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")
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue