New doom/delete-trailing-newlines command

This commit is contained in:
Henrik Lissner 2018-09-01 12:30:34 +02:00
parent 708ad138c8
commit 72d8c5dd56
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -254,6 +254,22 @@ Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
(t
(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