diff options
| -rw-r--r-- | lisp/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/ediff-merg.el | 5 | ||||
| -rw-r--r-- | lisp/ediff-util.el | 1 |
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 @@ | |||
| 1 | 2005-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 | |||
| 1 | 2005-11-04 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 9 | 2005-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))) |