aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKim F. Storm2004-04-30 21:38:23 +0000
committerKim F. Storm2004-04-30 21:38:23 +0000
commit977e2654712bb942ee3c9d34f42766aa899d8e01 (patch)
tree75d728e249f0d20a78e508e23ceecad799ad4b61
parentb2dae92a19717dad61eb43480a76df01e63376fd (diff)
downloademacs-977e2654712bb942ee3c9d34f42766aa899d8e01.tar.gz
emacs-977e2654712bb942ee3c9d34f42766aa899d8e01.zip
(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.
-rw-r--r--lisp/simple.el3
1 files changed, 2 insertions, 1 deletions
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."
2144 ;; look like a C-g typed as a command. 2144 ;; look like a C-g typed as a command.
2145 (inhibit-quit t)) 2145 (inhibit-quit t))
2146 (if (pos-visible-in-window-p other-end (selected-window)) 2146 (if (pos-visible-in-window-p other-end (selected-window))
2147 (unless transient-mark-mode 2147 (unless (and transient-mark-mode
2148 (face-background 'region))
2148 ;; Swap point and mark. 2149 ;; Swap point and mark.
2149 (set-marker (mark-marker) (point) (current-buffer)) 2150 (set-marker (mark-marker) (point) (current-buffer))
2150 (goto-char other-end) 2151 (goto-char other-end)