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)

diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el
index cdf50b34f950513e816ec506b31b9fcf25ff40e0..912a7357ca7a228759c924614576345120ff5b0e 100644 (file)
--- 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)))