master 040c03cae2: Make `M-q' work on the first line of a multi-line string again

[Lars Ingebrigtsen]

branch: master
commit 040c03cae2db361d2e014a52d969a6b0ebc48f1c
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make `M-q' work on the first line of a multi-line string again
    
    * lisp/emacs-lisp/lisp-mode.el (lisp-fill-paragraph): Exclude the
    quote marks from the region so that filling works (bug#56197).
---
 lisp/emacs-lisp/lisp-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index aaec13d1af..781c80fd5a 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -1481,8 +1481,8 @@ and initial semicolons."
                           (progn
                             (forward-sexp 1)
                             t))
-                    (narrow-to-region (ppss-comment-or-string-start ppss)
-                                      (point))))
+                    (narrow-to-region (1+ (ppss-comment-or-string-start ppss))
+                                      (1- (point)))))
                 ;; Move back to where we were.
                 (goto-char start)
                (fill-paragraph justify)))))))