From 7cf8a84007acbe5620cd54d3f5e7796221244a32 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Sat, 20 Jan 2024 05:43:27 -0600 Subject: [PATCH] Eldoc: play nice with mode-line-format-right-align (bug#68547) * lisp/emacs-lisp/eldoc.el (eldoc-minibuffer-message): Avoid nesting 'mode-line-format', since that breaks 'mode-line-format-right-align'. (cherry picked from commit 412cc0212d7bf2f2d0f49fdb8a4ff69480b8afed) --- lisp/emacs-lisp/eldoc.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index cdf50b34f95..912a7357ca7 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -313,9 +313,7 @@ Otherwise, it displays the message like `message' would." (assq 'eldoc-mode-line-string mode-line-format)))) (setq mode-line-format (funcall - (if (listp mode-line-format) - #'append - #'list) + (if (listp mode-line-format) #'append #'list) (list "" '(eldoc-mode-line-string (" " eldoc-mode-line-string " "))) mode-line-format))) -- 2.39.5