changeset 40069:bd85ab6cffed

Don't let kill-ring-save show extent if transient-mark-mode and region fully visible.
author Kim F. Storm <storm@cua.dk>
date Fri, 19 Oct 2001 23:24:26 +0000
parents 3a269250182d
children 23d563f99a41
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Fri Oct 19 22:12:42 2001 +0000
+++ b/lisp/simple.el	Fri Oct 19 23:24:26 2001 +0000
@@ -1797,7 +1797,7 @@
 	    ;; look like a C-g typed as a command.
 	    (inhibit-quit t))
 	(if (pos-visible-in-window-p other-end (selected-window))
-	    (progn
+	    (unless transient-mark-mode
 	      ;; Swap point and mark.
 	      (set-marker (mark-marker) (point) (current-buffer))
 	      (goto-char other-end)