From b7a1e68a4e8de82fc8095f0958b96c1aaf37d177 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Wed, 9 Nov 1994 20:18:34 +0000
Subject: [PATCH] (copy-region-as-kill): Don't set this-command.

---
 lisp/simple.el | 1 -
 1 file changed, 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 197e4e3df44..0c54a896b68 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1147,7 +1147,6 @@ system cut and paste."
   (if (eq last-command 'kill-region)
       (kill-append (buffer-substring beg end) (< end beg))
     (kill-new (buffer-substring beg end)))
-  (setq this-command 'kill-region)
   nil)
 
 (defun kill-ring-save (beg end)
-- 
2.39.5