diff options
Diffstat (limited to 'lisp/tooltip.el')
| -rw-r--r-- | lisp/tooltip.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index 05ba204511a..6ed93a0e99e 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -477,7 +477,8 @@ MSG is either a help string to display, or nil to cancel the display." (string-match "^mouse-2" msg)) (setq mp (mouse-pixel-position)) (consp (setq pos (cdr mp))) - (car pos) (cdr pos) + (car pos) (>= (car pos) 0) + (cdr pos) (>= (cdr pos) 0) (setq pos (posn-at-x-y (car pos) (cdr pos) (car mp))) (windowp (posn-window pos))) (with-current-buffer (window-buffer (posn-window pos)) |