From 1bcb9e6575ee9a73a01fae63908e5a57ebeff34b Mon Sep 17 00:00:00 2001
From: Chong Yidong <cyd@stupidchicken.com>
Date: Sat, 7 Aug 2010 16:10:30 -0400
Subject: [PATCH] Fix last change.

---
 lisp/simple.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index dd7f512e8ae..a3458531bbf 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3686,7 +3686,8 @@ This function also runs `deactivate-mark-hook'."
 	    ((/= (region-beginning) (region-end))
 	     (x-set-selection 'PRIMARY
 			      (buffer-substring-no-properties
-			       (point) (mark))))))
+			       (region-beginning)
+			       (region-end))))))
     (if (and (null force)
 	     (or (eq transient-mark-mode 'lambda)
 		 (and (eq (car-safe transient-mark-mode) 'only)
-- 
2.39.2