Mercurial > emacs
changeset 61471:c85ac0c1b8e9
(whitespace-highlight-the-space):
Don't call whitespace-unhighlight-the-space here.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 11 Apr 2005 18:38:56 +0000 |
| parents | 757b6ee5eaa1 |
| children | a6d1ac0e47b5 |
| files | lisp/whitespace.el |
| diffstat | 1 files changed, 1 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/whitespace.el Mon Apr 11 18:09:59 2005 +0000 +++ b/lisp/whitespace.el Mon Apr 11 18:38:56 2005 +0000 @@ -733,12 +733,11 @@ "Highlight the current line, unhighlighting a previously jumped to line." (if whitespace-display-spaces-in-color (let ((ol (whitespace-make-overlay b e))) - (whitespace-unhighlight-the-space) (push ol whitespace-highlighted-space) (whitespace-overlay-put ol 'face 'whitespace-highlight-face)))) ;; (add-hook 'pre-command-hook 'whitespace-unhighlight-the-space)) -(defun whitespace-unhighlight-the-space () +(defun whitespace-unhighlight-the-space() "Unhighlight the currently highlight line." (if (and whitespace-display-spaces-in-color whitespace-highlighted-space) (progn