Mercurial > emacs
changeset 3860:70bdc91ef161
* subr.el (event-end): Modified to account for multi-click events.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Tue, 22 Jun 1993 02:02:00 +0000 |
| parents | 7e2410ba8e41 |
| children | fc8c92b69513 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Mon Jun 21 20:08:39 1993 +0000 +++ b/lisp/subr.el Tue Jun 22 02:02:00 1993 +0000 @@ -313,7 +313,7 @@ The return value is of the form (WINDOW BUFFER-POSITION (COL . ROW) TIMESTAMP) The `posn-' functions access elements of such lists." - (nth (1- (length event)) event)) + (nth (if (consp (nth 2 event)) 2 1) event)) (defsubst posn-window (position) "Return the window in POSITION.