Mercurial > emacs
changeset 18503:828ca7cea30f
(mouse-undouble-last-event): Use reverse, not nreverse.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 01 Jul 1997 04:33:22 +0000 |
| parents | 708870732e5d |
| children | f0f8ac814b26 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Mon Jun 30 21:25:37 1997 +0000 +++ b/lisp/mouse.el Tue Jul 01 04:33:22 1997 +0000 @@ -726,7 +726,9 @@ (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)