From db6f8ff1255afd890b76979f58b475b74298183a Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Fri, 19 Oct 2001 23:25:34 +0000 Subject: [PATCH] Don't let kill-ring-save show extent if transient-mark-mode and region fully visible. --- lisp/ChangeLog | 5 +++++ lisp/simple.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index edcae426a16..7713340b855 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-10-20 Kim F. Storm + + * simple.el (kill-ring-save): Don't show extent of copied region + if using transient-mark-mode and region is fully visible. + 2001-10-19 Eli Zaretskii * files.el (auto-mode-alist): Associate .indent.pro with diff --git a/lisp/simple.el b/lisp/simple.el index 3879003b557..0374a0aca57 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1797,7 +1797,7 @@ visual feedback indicating the extent of the region being copied." ;; 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) -- 2.39.2