awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-31 14:43:40 -05:00
Code Issues Packages Projects Releases Wiki Activity

Smarter delete-trailing-whitespace

Browse Source
This commit is contained in:
Henrik Lissner
2015-08-01 14:38:41 +02:00
parent 81c58e0efa
commit 9577ec28c7
2 changed files with 4 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
core/lib/defuns-whitespace.el
View File

@@ -157,14 +157,5 @@ spaces on either side of the point if so. Resorts to
(align-regexp beg end
(concat "\\(\\s-*\\)" (rxt-pcre-to-elisp regexp)) 1 1)))
;;;###autoload
(defun narf:toggle-delete-trailing-whitespace ()
(interactive)
(if (memq 'delete-trailing-whitespace before-save-hook)
(progn (message "Remove trailing whitespace: OFF")
(remove-hook 'before-save-hook 'delete-trailing-whitespace))
(message "Remove trailing whitespace: ON")
(add-hook 'before-save-hook 'delete-trailing-whitespace)))
(provide 'defuns-whitespace)
;;; defuns-whitespace.el ends here