From 977e2654712bb942ee3c9d34f42766aa899d8e01 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Fri, 30 Apr 2004 21:38:23 +0000 Subject: [PATCH] (kill-ring-save): If region face background color is unspecified (if no highlighting), show extent of fully visible region even if transient-mark-mode is enabled. --- lisp/simple.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index 80c16726c50..b32d2408880 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2144,7 +2144,8 @@ 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)) - (unless transient-mark-mode + (unless (and transient-mark-mode + (face-background 'region)) ;; Swap point and mark. (set-marker (mark-marker) (point) (current-buffer)) (goto-char other-end) -- 2.39.5