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).
This commit is contained in:
Lars Ingebrigtsen 2022-06-25 14:58:01 +02:00
parent bdf495f25f
commit 040c03cae2

View file

@ -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)))))))