Mercurial > emacs
changeset 76925:f6250d52a57e
(t-mouse-make-event-element): Don't use the left edge
of the window if we're outside it e.g menu-bar.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Tue, 03 Apr 2007 21:16:40 +0000 |
parents | 44b6d7a1ef55 |
children | d13721cc3255 |
files | lisp/t-mouse.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/t-mouse.el Tue Apr 03 21:16:17 2007 +0000 +++ b/lisp/t-mouse.el Tue Apr 03 21:16:40 2007 +0000 @@ -144,7 +144,7 @@ (event (if w (posn-at-x-y (- x left) (- y top) w t) (append (list nil 'menu-bar) - (nthcdr 2 (posn-at-x-y x y w t)))))) + (nthcdr 2 (posn-at-x-y x y)))))) (setcar (nthcdr 3 event) time) event))