From 7132500badc7d21bb607fd4565793a8ab2c2546b Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Tue, 1 Jul 1997 04:33:22 +0000
Subject: [PATCH] (mouse-undouble-last-event): Use reverse, not nreverse.

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

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 29bc077218d..41b543e3892 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -726,7 +726,9 @@ If DIR is positive skip forward; if negative, skip backward."
 	 (modifiers (delq 'double (delq 'triple (copy-sequence old-modifiers))))
 	 (new
 	  (if (consp event)
-	      (cons (event-convert-list (nreverse (cons basic old-modifiers)))
+	      ;; Use reverse, not nreverse, since event-modifiers
+	      ;; does not copy the list it returns.
+	      (cons (event-convert-list (reverse (cons basic old-modifiers)))
 		    (cdr event))
 	    event)))
     (setcar last new)
-- 
2.39.2