mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-27 10:54:40 +00:00
(perl-indent-command): Use delete-region instead of kill-region.
This commit is contained in:
parent
041d3802a0
commit
a89d4ed8ae
@ -647,10 +647,10 @@ possible action from the following list:
|
||||
(if (and comment-start-skip
|
||||
(re-search-forward comment-start-skip eol 'move))
|
||||
(if (eolp)
|
||||
(progn ; kill existing comment
|
||||
(progn ; delete existing comment
|
||||
(goto-char (match-beginning 0))
|
||||
(skip-chars-backward " \t")
|
||||
(kill-region (point) eol))
|
||||
(delete-region (point) eol))
|
||||
(if (or (< oldpnt (point)) (= oldpnt eol))
|
||||
(indent-for-comment) ; indent existing comment
|
||||
(end-of-line)))
|
||||
|
Loading…
Reference in New Issue
Block a user