aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2014-05-02 22:27:46 -0400
committerStefan Monnier2014-05-02 22:27:46 -0400
commite6cf6ca050891610596a559a2fb707570c4c1fe5 (patch)
treed9f8787a501e97d347e358a9bc8baac738d44951
parent283d38edc96eb5e764ccc094d6affaef9e9d2c95 (diff)
downloademacs-e6cf6ca050891610596a559a2fb707570c4c1fe5.tar.gz
emacs-e6cf6ca050891610596a559a2fb707570c4c1fe5.zip
* lisp/vc/ediff-diff.el (ediff-set-fine-diff-properties-in-one-buffer):
Use nil rather than `default' for the "default" appearance. * lisp/vc/ediff-util.el (ediff-inferior-compare-regions) (ediff-toggle-autorefine, ediff-unselect-difference): Don't use a misleading `default' value when it's really a boolean. * lisp/vc/ediff-init.el (ediff-set-overlay-face): Don't set help-echo if the overlay is not visible. Fixes: debbugs:17388
-rw-r--r--lisp/ChangeLog10
-rw-r--r--lisp/vc/ediff-diff.el5
-rw-r--r--lisp/vc/ediff-init.el2
-rw-r--r--lisp/vc/ediff-util.el6
4 files changed, 16 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9edc7641c74..b16c370e4e4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,13 @@
12014-05-03 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * vc/ediff-diff.el (ediff-set-fine-diff-properties-in-one-buffer):
4 Use nil rather than `default' for the "default" appearance (bug#17388).
5 * vc/ediff-util.el (ediff-inferior-compare-regions)
6 (ediff-toggle-autorefine, ediff-unselect-difference): Don't use
7 a misleading `default' value when it's really a boolean.
8 * vc/ediff-init.el (ediff-set-overlay-face): Don't set help-echo if the
9 overlay is not visible.
10
12014-05-02 Stephen Berman <stephen.berman@gmx.net> 112014-05-02 Stephen Berman <stephen.berman@gmx.net>
2 12
3 * calendar/todo-mode.el (todo-edit-file): Use display-warning. 13 * calendar/todo-mode.el (todo-edit-file): Use display-warning.
diff --git a/lisp/vc/ediff-diff.el b/lisp/vc/ediff-diff.el
index ed248fbf835..d21b4cc6d0b 100644
--- a/lisp/vc/ediff-diff.el
+++ b/lisp/vc/ediff-diff.el
@@ -818,10 +818,9 @@ one optional arguments, diff-number to refine.")
818 n &optional default) 818 n &optional default)
819 (let ((fine-diff-vector (ediff-get-fine-diff-vector n buf-type)) 819 (let ((fine-diff-vector (ediff-get-fine-diff-vector n buf-type))
820 (face (if default 820 (face (if default
821 'default 821 nil
822 (ediff-get-symbol-from-alist 822 (ediff-get-symbol-from-alist
823 buf-type ediff-fine-diff-face-alist) 823 buf-type ediff-fine-diff-face-alist))))
824 )))
825 (mapc (lambda (overl) 824 (mapc (lambda (overl)
826 (ediff-set-overlay-face overl face)) 825 (ediff-set-overlay-face overl face))
827 fine-diff-vector))) 826 fine-diff-vector)))
diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el
index f3781c53885..dd0d76485bf 100644
--- a/lisp/vc/ediff-init.el
+++ b/lisp/vc/ediff-init.el
@@ -807,7 +807,7 @@ TYPE-OF-EMACS is either 'xemacs or 'emacs."
807 807
808(defun ediff-set-overlay-face (extent face) 808(defun ediff-set-overlay-face (extent face)
809 (ediff-overlay-put extent 'face face) 809 (ediff-overlay-put extent 'face face)
810 (ediff-overlay-put extent 'help-echo 'ediff-region-help-echo)) 810 (ediff-overlay-put extent 'help-echo (if face 'ediff-region-help-echo)))
811 811
812(defun ediff-region-help-echo (extent-or-window &optional overlay _point) 812(defun ediff-region-help-echo (extent-or-window &optional overlay _point)
813 (unless overlay 813 (unless overlay
diff --git a/lisp/vc/ediff-util.el b/lisp/vc/ediff-util.el
index 649ef884059..dbf52479527 100644
--- a/lisp/vc/ediff-util.el
+++ b/lisp/vc/ediff-util.el
@@ -958,7 +958,7 @@ On a dumb terminal, switches between ASCII highlighting and no highlighting."
958 (message "Auto-refining is OFF") 958 (message "Auto-refining is OFF")
959 (setq ediff-auto-refine 'off)) 959 (setq ediff-auto-refine 'off))
960 (t ;; nix 'em 960 (t ;; nix 'em
961 (ediff-set-fine-diff-properties ediff-current-difference 'default) 961 (ediff-set-fine-diff-properties ediff-current-difference t)
962 (message "Refinements are HIDDEN") 962 (message "Refinements are HIDDEN")
963 (setq ediff-auto-refine 'nix)) 963 (setq ediff-auto-refine 'nix))
964 )) 964 ))
@@ -2973,7 +2973,7 @@ Hit \\[ediff-recenter] to reset the windows afterward."
2973 )) 2973 ))
2974 2974
2975 ;; unhighlight fine diffs 2975 ;; unhighlight fine diffs
2976 (ediff-set-fine-diff-properties ediff-current-difference 'default) 2976 (ediff-set-fine-diff-properties ediff-current-difference t)
2977 (run-hooks 'ediff-unselect-hook)))) 2977 (run-hooks 'ediff-unselect-hook))))
2978 2978
2979 2979
@@ -3492,7 +3492,7 @@ Ediff Control Panel to restore highlighting."
3492 3492
3493 (if (ediff-valid-difference-p ediff-current-difference) 3493 (if (ediff-valid-difference-p ediff-current-difference)
3494 (progn 3494 (progn
3495 (ediff-set-fine-diff-properties ediff-current-difference 'default) 3495 (ediff-set-fine-diff-properties ediff-current-difference t)
3496 (ediff-unhighlight-diff))) 3496 (ediff-unhighlight-diff)))
3497 (ediff-paint-background-regions 'unhighlight) 3497 (ediff-paint-background-regions 'unhighlight)
3498 3498