# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1111528328 0
# Node ID b39c6b2034faf35c88d589690bb03c0f93570240
# Parent  74476de5b3b7ca84a93efab39f727f41b614589c
(tooltip-show-help-function): Ignore negative mouse
position values.

diff -r 74476de5b3b7 -r b39c6b2034fa lisp/tooltip.el
--- a/lisp/tooltip.el	Tue Mar 22 21:51:50 2005 +0000
+++ b/lisp/tooltip.el	Tue Mar 22 21:52:08 2005 +0000
@@ -477,7 +477,8 @@
 	       (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))