changeset 55262:49e42dd581dd

(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.
author Kim F. Storm <storm@cua.dk>
date Fri, 30 Apr 2004 21:38:23 +0000
parents e532474638f8
children eb737a4709cb
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Fri Apr 30 21:37:43 2004 +0000
+++ b/lisp/simple.el	Fri Apr 30 21:38:23 2004 +0000
@@ -2144,7 +2144,8 @@
 	    ;; 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)