diff options
Diffstat (limited to 'lisp/ediff-util.el')
| -rw-r--r-- | lisp/ediff-util.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ediff-util.el b/lisp/ediff-util.el index 015e6bfff3e..7483128b71a 100644 --- a/lisp/ediff-util.el +++ b/lisp/ediff-util.el @@ -1,7 +1,7 @@ ;;; ediff-util.el --- the core commands and utilities of ediff ;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, -;; 2003, 2004, 2005, 2006 Free Software Foundation, Inc. +;; 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc. ;; Author: Michael Kifer <kifer@cs.stonybrook.edu> @@ -3346,13 +3346,14 @@ Without an argument, it saves customized diff argument, if available (setq wind (ediff-get-visible-buffer-window cloned-buff)) (select-window wind) (delete-other-windows) + (ediff-activate-mark) (split-window-vertically) (ediff-select-lowest-window) (setq other-wind (selected-window)) (with-temp-buffer (erase-buffer) (insert - (format "\n ******* Mark a region in buffer %s *******\n" + (format "\n ******* Mark a region in buffer %s (or confirm the existing one) *******\n" (buffer-name cloned-buff))) (insert (ediff-with-current-buffer buff @@ -4059,7 +4060,11 @@ Mail anyway? (y or n) ") (defun ediff-activate-mark () (ediff-cond-compile-for-xemacs-or-emacs (zmacs-activate-region) ; xemacs - (setq mark-active t) ; emacs + (progn + (make-local-variable 'transient-mark-mode) + (setq mark-active t + transient-mark-mode t) ; emacs + ) )) (cond ((fboundp 'nuke-selective-display) |