master 98649236f5e: Fix 'mode-line-right-align-edge' with asymmetrical margins

[Eli Zaretskii]

branch: master
commit 98649236f5eb1d89a60ebb9cc06c71f410f6b347
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix 'mode-line-right-align-edge' with asymmetrical margins
    
    * lisp/bindings.el (mode--line-format-right-align): Fix alignment
    when window-margins are different on each side of the window.
    Suggested by Charles Gonnaud <charles.gonnaud@gmail.com>.
    (Bug#70485)
---
 lisp/bindings.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/bindings.el b/lisp/bindings.el
index 50af32076a3..5a8c7cfafd7 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -381,7 +381,7 @@ the symbol `mode-line-format-right-align' is processed by
                  `(space :align-to (,(- (window-pixel-width)
                                          (window-scroll-bar-width)
                                          (window-right-divider-width)
-                                         (* (or (cdr (window-margins)) 1)
+                                         (* (or (car (window-margins)) 0)
                                             (frame-char-width))
                                          ;; Manually account for value of
                                          ;; `mode-line-right-align-edge' even