aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/ediff-merg.el5
-rw-r--r--lisp/ediff-util.el1
3 files changed, 13 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 84f90e1ce5a..fad5fa8b322 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
12005-11-04 Michael Kifer <kifer@cs.stonybrook.edu>
2
3 * ediff-merge.el (ediff-merge-region-is-non-clash): return t, if not
4 merging.
5
6 * ediff-util.el (ediff-previous-difference): don't skip regions that
7 have merge clashes.
8
12005-11-04 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> 92005-11-04 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
2 10
3 * mwheel.el (mouse-wheel-down-event, mouse-wheel-up-event): Undo 11 * mwheel.el (mouse-wheel-down-event, mouse-wheel-up-event): Undo
diff --git a/lisp/ediff-merg.el b/lisp/ediff-merg.el
index b08238467df..5a5a2983327 100644
--- a/lisp/ediff-merg.el
+++ b/lisp/ediff-merg.el
@@ -104,8 +104,11 @@ Buffer B."
104(make-variable-buffer-local 'ediff-skip-merge-regions-that-differ-from-default) 104(make-variable-buffer-local 'ediff-skip-merge-regions-that-differ-from-default)
105 105
106;; check if there is no clash between the ancestor and one of the variants. 106;; check if there is no clash between the ancestor and one of the variants.
107;; if it is not a merge job then return true
107(defsubst ediff-merge-region-is-non-clash (n) 108(defsubst ediff-merge-region-is-non-clash (n)
108 (string-match "prefer" (or (ediff-get-state-of-merge n) ""))) 109 (if (ediff-merge-job)
110 (string-match "prefer" (or (ediff-get-state-of-merge n) ""))
111 t))
109 112
110;; If ediff-show-clashes-only, check if there is no clash between the ancestor 113;; If ediff-show-clashes-only, check if there is no clash between the ancestor
111;; and one of the variants. 114;; and one of the variants.
diff --git a/lisp/ediff-util.el b/lisp/ediff-util.el
index 41f294c1b13..9db05ad143b 100644
--- a/lisp/ediff-util.el
+++ b/lisp/ediff-util.el
@@ -1794,6 +1794,7 @@ With a prefix argument, go back that many differences."
1794 skip-changed 1794 skip-changed
1795 ;; skip difference regions that differ in white space 1795 ;; skip difference regions that differ in white space
1796 (and ediff-ignore-similar-regions 1796 (and ediff-ignore-similar-regions
1797 (ediff-merge-region-is-non-clash n)
1797 (or (eq (ediff-no-fine-diffs-p n) t) 1798 (or (eq (ediff-no-fine-diffs-p n) t)
1798 (and (ediff-merge-job) 1799 (and (ediff-merge-job)
1799 (eq (ediff-no-fine-diffs-p n) 'C))) 1800 (eq (ediff-no-fine-diffs-p n) 'C)))