changeset 21193:20bba919ec72

(copy-region-as-kill): Set deactivate-mark instead of clearing mark-active directly.
author Richard M. Stallman <rms@gnu.org>
date Mon, 16 Mar 1998 08:01:15 +0000
parents f985cd03f38c
children 7a7950ffa79b
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Mon Mar 16 05:58:11 1998 +0000
+++ b/lisp/simple.el	Mon Mar 16 08:01:15 1998 +0000
@@ -1661,7 +1661,7 @@
       (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)