procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
of the window if we're outside it e.g menu-bar.
This commit is contained in:
Nick Roberts 2007-04-03 21:16:40 +00:00
parent ad15832ecb
commit fc7ed6dd06
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/t-mouse.el
View file

@ -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))