diff options
| author | Kim F. Storm <storm@cua.dk> | 2005-03-22 21:52:08 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2005-03-22 21:52:08 +0000 |
| commit | e7f876b4734b4263fe759a03860a90ce3de3e19f (patch) | |
| tree | b17ede2991cd8afa192a7ef60bc175e315b52743 /lisp/tooltip.el | |
| parent | eac7d7eb948c6151421aad61a9c044999d10bd33 (diff) | |
| download | emacs-e7f876b4734b4263fe759a03860a90ce3de3e19f.tar.gz | |
(tooltip-show-help-function): Ignore negative mouse
position values.
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)) |