diff options
| author | Richard M. Stallman | 1997-07-09 02:47:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-07-09 02:47:07 +0000 |
| commit | 3bb846b8713fcd14236b2ba3f5fc204ecd3eb220 (patch) | |
| tree | 875430b44a205de7aada929c83d1c593610fff30 /lisp | |
| parent | 2289984b61a4362f74d1d360409882d27fe5c305 (diff) | |
| download | emacs-3bb846b8713fcd14236b2ba3f5fc204ecd3eb220.tar.gz emacs-3bb846b8713fcd14236b2ba3f5fc204ecd3eb220.zip | |
(mouse-undouble-last-event): Fix gross bugs:
use modifiers, not old-modifiers.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 07b525546cf..d760c437bf7 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -728,7 +728,7 @@ If DIR is positive skip forward; if negative, skip backward." | |||
| 728 | (if (consp event) | 728 | (if (consp event) |
| 729 | ;; Use reverse, not nreverse, since event-modifiers | 729 | ;; Use reverse, not nreverse, since event-modifiers |
| 730 | ;; does not copy the list it returns. | 730 | ;; does not copy the list it returns. |
| 731 | (cons (event-convert-list (reverse (cons basic old-modifiers))) | 731 | (cons (event-convert-list (reverse (cons basic modifiers))) |
| 732 | (cdr event)) | 732 | (cdr event)) |
| 733 | event))) | 733 | event))) |
| 734 | (setcar last new) | 734 | (setcar last new) |