masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-18 18:00:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Make the invocation of combine-change-calls in comment-region valid

Browse source 
This fixes bug #44581.  The problem was that whitespace outside of the (BEG
END) region was being deleted, and this made the invocation of
combine-change-calls with (BEG END) invalid.

* lisp/newcomment.el (comment-region-default): Amend the second argument to
combine-change-calls.
This commit is contained in:
Alan Mackenzie 2020-11-15 13:23:15 +00:00
parent 66bcec8838
commit 4ec740866a
1 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/newcomment.el
View file

@ -1292,7 +1292,15 @@ changed with `comment-style'."
(defun comment-region-default (beg end &optional arg) (defun comment-region-default (beg end &optional arg)
(if comment-combine-change-calls (if comment-combine-change-calls
(combine-change-calls beg end (comment-region-default-1 beg end arg)) (combine-change-calls beg
;; A new line might get inserted and whitespace deleted
;; after END for line comments. Ensure the next argument is
;; after any and all changes.
(save-excursion
(goto-char end)
(forward-line)
(point))
(comment-region-default-1 beg end arg))
(comment-region-default-1 beg end arg))) (comment-region-default-1 beg end arg)))
;;;###autoload ;;;###autoload