Mercurial > emacs
diff lisp/diff-mode.el @ 96999:c80df631ecf5
New function diff-show-trailing-blanks in diff-mode.el.
author | Vinicius Jose Latorre <viniciusjl@ig.com.br> |
---|---|
date | Fri, 25 Jul 2008 02:34:31 +0000 |
parents | c80b0289ddf5 |
children | 6990bb16ca16 |
line wrap: on
line diff
--- a/lisp/diff-mode.el Fri Jul 25 02:33:49 2008 +0000 +++ b/lisp/diff-mode.el Fri Jul 25 02:34:31 2008 +0000 @@ -1881,6 +1881,13 @@ ;; When there's no more hunks, diff-hunk-next signals an error. (error nil))))) +(defun diff-show-trailing-blanks () + "Show trailing blanks in modified lines for diff-mode." + (interactive) + (let ((whitespace-style '(trailing)) + (whitespace-trailing-regexp "^[-\+!<>].*?\\([\t ]+\\)$")) + (whitespace-mode 1))) ; display trailing blanks in diff buffer + ;; provide the package (provide 'diff-mode)