mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-03 12:27:26 -05:00
New doom/delete-trailing-newlines command
This commit is contained in:
@ -254,6 +254,22 @@ Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
|
|||||||
(t
|
(t
|
||||||
(widen))))
|
(widen))))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun doom/delete-trailing-newlines ()
|
||||||
|
"Trim trailing newlines.
|
||||||
|
|
||||||
|
Respects `require-final-newline'."
|
||||||
|
(interactive)
|
||||||
|
(goto-char (point-max))
|
||||||
|
(skip-chars-backward " \t\n\v")
|
||||||
|
(when (looking-at "\n\\(\n\\|\\'\\)")
|
||||||
|
(forward-char 1))
|
||||||
|
(when require-final-newline
|
||||||
|
(unless (bolp)
|
||||||
|
(insert "\n")))
|
||||||
|
(when (looking-at "\n+")
|
||||||
|
(replace-match "")))
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;; Advice
|
;; Advice
|
||||||
|
Reference in New Issue
Block a user