1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-10 05:30:45 -08:00

Fix 'mode-line-format-right-align' in Olivetti mode

* lisp/bindings.el (mode--line-format-right-align): Account for
the left fringe.  (Bug#80019)
This commit is contained in:
Eli Zaretskii 2025-12-17 15:14:25 +02:00
parent 0c7420fe38
commit b7601bfb70

View file

@ -383,6 +383,7 @@ the symbol `mode-line-format-right-align' is processed by
(window-right-divider-width)
(* (or (car (window-margins)) 0)
(frame-char-width))
(car (window-fringes))
;; Manually account for value of
;; `mode-line-right-align-edge' even
;; when display is non-graphical