Mercurial > emacs

changeset 80511:e85df11c51e4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gud-tooltip-tips): Use tooltip-event-buffer
author Nick Roberts <nickrob@snap.net.nz>
date Sat, 12 Apr 2008 13:14:56 +0000
parents f3ac5401fa8e
children 444a87e05509 3af508d0bd74
files lisp/progmodes/gud.el
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/gud.el	Sat Apr 12 13:13:32 2008 +0000
+++ b/lisp/progmodes/gud.el	Sat Apr 12 13:14:56 2008 +0000
@@ -3401,10 +3401,7 @@
 	  (if (and (eq gud-minor-mode 'gdba)
 		   (not gdb-active-process))
 	      (progn
-		(with-current-buffer
-		    (window-buffer (let ((mouse (mouse-position)))
-				     (window-at (cadr mouse)
-						(cddr mouse))))
+		(with-current-buffer (tooltip-event-buffer event)
 		  (let ((define-elt (assoc expr gdb-define-alist)))
 		    (unless (null define-elt)
 		      (tooltip-show