diff options
| author | Chong Yidong | 2012-04-25 23:06:51 +0800 |
|---|---|---|
| committer | Chong Yidong | 2012-04-25 23:06:51 +0800 |
| commit | 07875ee72bffac01a1978d0367883d6ceb88cc55 (patch) | |
| tree | e0815f89a1b9d015e0fdbde6670bec3aeef74096 /lisp/vc/diff.el | |
| parent | 5055880d396c98f9bacfd4d19aa4a9ae85d3a87c (diff) | |
| download | emacs-07875ee72bffac01a1978d0367883d6ceb88cc55.tar.gz emacs-07875ee72bffac01a1978d0367883d6ceb88cc55.zip | |
Fix whitespace highlighting of context diffs.
* lisp/vc/diff-mode.el (diff-setup-whitespace): New function.
(diff-mode): Use it.
* lisp/vc/diff.el (diff-sentinel):
* lisp/vc/vc.el (vc-diff-finish): Call diff-setup-whitespace to assign
Whitespace mode variables based on diff style.
Fixes: debbugs:8612
Diffstat (limited to 'lisp/vc/diff.el')
| -rw-r--r-- | lisp/vc/diff.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/vc/diff.el b/lisp/vc/diff.el index 05208894356..dd4b4757e88 100644 --- a/lisp/vc/diff.el +++ b/lisp/vc/diff.el | |||
| @@ -30,6 +30,8 @@ | |||
| 30 | 30 | ||
| 31 | ;;; Code: | 31 | ;;; Code: |
| 32 | 32 | ||
| 33 | (declare-function diff-setup-whitespace "diff-mode" ()) | ||
| 34 | |||
| 33 | (eval-when-compile (require 'cl)) | 35 | (eval-when-compile (require 'cl)) |
| 34 | 36 | ||
| 35 | (defgroup diff nil | 37 | (defgroup diff nil |
| @@ -64,6 +66,7 @@ If optional args OLD-TEMP-FILE and/or NEW-TEMP-FILE are non-nil, | |||
| 64 | delete the temporary files so named." | 66 | delete the temporary files so named." |
| 65 | (if old-temp-file (delete-file old-temp-file)) | 67 | (if old-temp-file (delete-file old-temp-file)) |
| 66 | (if new-temp-file (delete-file new-temp-file)) | 68 | (if new-temp-file (delete-file new-temp-file)) |
| 69 | (diff-setup-whitespace) | ||
| 67 | (save-excursion | 70 | (save-excursion |
| 68 | (goto-char (point-max)) | 71 | (goto-char (point-max)) |
| 69 | (let ((inhibit-read-only t)) | 72 | (let ((inhibit-read-only t)) |