master 8ab9102950: Fix `M-x lisp-fill-paragraph'

[Lars Ingebrigtsen]

branch: master
commit 8ab9102950e9476c0d0d1cbecfd7c1dd22141a5f
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix `M-x lisp-fill-paragraph'
    
    * lisp/emacs-lisp/lisp-mode.el (lisp-fill-paragraph): Fix filling
    when called directly with `M-x lisp-fill-paragraph' instead of via
    `M-q' (bug#56476).
---
 lisp/emacs-lisp/lisp-mode.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 68528e199f..c906ee6e31 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -1466,7 +1466,10 @@ and initial semicolons."
                              emacs-lisp-docstring-fill-column
                            fill-column)))
         (let ((ppss (syntax-ppss))
-              (start (point)))
+              (start (point))
+              ;; Avoid recursion if we're being called directly with
+              ;; `M-x lisp-fill-paragraph' in an `emacs-lisp-mode' buffer.
+              (fill-paragraph-function t))
           (save-excursion
             (save-restriction
               ;; If we're not inside a string, then do very basic