# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 742171334 0
# Node ID ad0643aa3ebf3450667ea924cc19a7b0d514852c
# Parent  6228decc135368fd82dba909b9ee8561e93f491e
(kill-ring-save): Call deactivate-mark regardless of transient-mark-mode.

diff -r 6228decc1353 -r ad0643aa3ebf lisp/simple.el
--- a/lisp/simple.el	Thu Jul 08 22:38:59 1993 +0000
+++ b/lisp/simple.el	Thu Jul 08 22:42:14 1993 +0000
@@ -1094,7 +1094,7 @@
 	      (goto-char opoint)
 	      ;; If user quit, deactivate the mark
 	      ;; as C-g would as a command.
-	      (and quit-flag transient-mark-mode mark-active
+	      (and quit-flag mark-active
 		   (progn
 		     (message "foo")	;XXX what is this here for?  --roland
 		     (deactivate-mark))))