Mercurial > emacs
comparison lisp/ediff-util.el @ 52828:d08ef8842be1
2003-10-12 Michael Kifer <kifer@cs.stonybrook.edu>
* ediff-mult.el (ediff-filegroup-action): use
ediff-default-filtering-regexp.
* ediff-util.el (ediff-recenter): don't call
ediff-restore-highlighting twice.
(ediff-select-difference): set current difference.
(ediff-unselect-and-select-difference): added comment.
* ediff.el (ediff-directories,ediff-directory-revisions,
ediff-directories3,ediff-merge-directories,
ediff-merge-directories-with-ancestor,ediff-merge-directory-revisions,
ediff-merge-directory-revisions-with-ancestor): use
ediff-default-filtering-regexp.
author | Michael Kifer <kifer@cs.stonybrook.edu> |
---|---|
date | Mon, 13 Oct 2003 01:28:49 +0000 |
parents | 695cf19ef79e |
children | 6a6dc234f296 |
comparison
equal
deleted
inserted
replaced
52827:7d76fa8c5eda | 52828:d08ef8842be1 |
---|---|
824 (ediff-reset-mouse | 824 (ediff-reset-mouse |
825 control-frame | 825 control-frame |
826 (eq this-command 'ediff-quit)))) | 826 (eq this-command 'ediff-quit)))) |
827 )) | 827 )) |
828 | 828 |
829 (ediff-restore-highlighting) | 829 (or no-rehighlight |
830 (ediff-restore-highlighting)) | |
830 (ediff-with-current-buffer control-buf (ediff-refresh-mode-lines)) | 831 (ediff-with-current-buffer control-buf (ediff-refresh-mode-lines)) |
831 )) | 832 )) |
832 | 833 |
833 ;; this function returns to the window it was called from | 834 ;; this function returns to the window it was called from |
834 ;; (which was the control window) | 835 ;; (which was the control window) |
2938 'Ancestor ediff-ancestor-buffer | 2939 'Ancestor ediff-ancestor-buffer |
2939 ediff-control-buffer n)) | 2940 ediff-control-buffer n)) |
2940 )) | 2941 )) |
2941 | 2942 |
2942 (ediff-install-fine-diff-if-necessary n) | 2943 (ediff-install-fine-diff-if-necessary n) |
2944 ;; set current difference here so the hook will be able to refer to it | |
2945 (setq ediff-current-difference n) | |
2943 (run-hooks 'ediff-select-hook)))) | 2946 (run-hooks 'ediff-select-hook)))) |
2944 | 2947 |
2945 | 2948 |
2946 ;; Unselect a difference by removing the ASCII flags in the buffers. | 2949 ;; Unselect a difference by removing the ASCII flags in the buffers. |
2947 ;; This may have to be modified for buffer C, when it will be supported. | 2950 ;; This may have to be modified for buffer C, when it will be supported. |
2989 (or (eq flag 'select-only) | 2992 (or (eq flag 'select-only) |
2990 (ediff-unselect-difference ediff-current-difference)) | 2993 (ediff-unselect-difference ediff-current-difference)) |
2991 | 2994 |
2992 (or (eq flag 'unselect-only) | 2995 (or (eq flag 'unselect-only) |
2993 (ediff-select-difference n)) | 2996 (ediff-select-difference n)) |
2997 ;; need to set current diff here even though it is also set in | |
2998 ;; ediff-select-difference because ediff-select-difference might not | |
2999 ;; be called if unselect-only is specified | |
2994 (setq ediff-current-difference n) | 3000 (setq ediff-current-difference n) |
2995 ) ; end protected section | 3001 ) ; end protected section |
2996 | 3002 |
2997 (ediff-with-current-buffer control-buf (ediff-refresh-mode-lines))) | 3003 (ediff-with-current-buffer control-buf (ediff-refresh-mode-lines))) |
2998 )) | 3004 )) |