Mercurial > emacs
changeset 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 | 2d3110c3f3dd |
children | 3903faf8b34b |
files | lisp/ChangeLog lisp/diff-mode.el |
diffstat | 2 files changed, 12 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Jul 25 02:33:49 2008 +0000 +++ b/lisp/ChangeLog Fri Jul 25 02:34:31 2008 +0000 @@ -1,3 +1,8 @@ +2008-07-24 Vinicius Jose Latorre <viniciusjl@ig.com.br> + + * diff-mode.el (diff-show-trailing-blanks): New fun. Show trailing + blanks in modified lines for diff-mode. + 2008-07-24 Michael Albinus <michael.albinus@gmx.de> * Makefile.in (ELCFILES): Add net/xesam.el.
--- 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)