From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 16 Mar 1998 08:01:15 +0000 (+0000)
Subject: (copy-region-as-kill): Set deactivate-mark
X-Git-Tag: emacs-20.3~1881
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5c7319b6cecffa5b099a2c265c50b5d87f26d795;p=emacs.git

(copy-region-as-kill): Set deactivate-mark
instead of clearing mark-active directly.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index be60e3c8f73..42ef85aa870 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1661,7 +1661,7 @@ system cut and paste."
       (kill-append (buffer-substring beg end) (< end beg))
     (kill-new (buffer-substring beg end)))
   (if transient-mark-mode 
-      (setq mark-active nil))
+      (setq deactivate-mark t))
   nil)
 
 (defun kill-ring-save (beg end)