(t-mouse-make-event-element): Don't use the left edge

of the window if we're outside it e.g menu-bar.

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/t-mouse.el b/lisp/t-mouse.el
index c8a7e9b6536..eca2ce2b9fe 100644
--- a/lisp/t-mouse.el
+++ b/lisp/t-mouse.el
@@ -144,7 +144,7 @@ For example, \"2\" for /dev/tty2."
          (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))