]> git.eshelyaron.com Git - emacs.git/commitdiff
(kill-ring-save): If region face background color is
authorKim F. Storm <storm@cua.dk>
Fri, 30 Apr 2004 21:38:23 +0000 (21:38 +0000)
committerKim F. Storm <storm@cua.dk>
Fri, 30 Apr 2004 21:38:23 +0000 (21:38 +0000)
unspecified (if no highlighting), show extent of fully visible
region even if transient-mark-mode is enabled.

lisp/simple.el

index 80c16726c5054bc581109cf79c485a6c8391f9a8..b32d2408880a3b20c40239414bac86c415eca740 100644 (file)
@@ -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)