diff options
| author | Kim F. Storm <storm@cua.dk> | 2005-02-22 09:42:23 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2005-02-22 09:42:23 +0000 |
| commit | 161f8b5b777c5f14ff5ed6f4d21726890cdb5ac4 (patch) | |
| tree | e2def16ce5d4662f45a9cd928309461c8ee84d01 /lisp/tooltip.el | |
| parent | b0ca1b8a9689a39682d221cff2fef26a7adf33b9 (diff) | |
| download | emacs-161f8b5b777c5f14ff5ed6f4d21726890cdb5ac4.tar.gz | |
(tooltip-show-help-function): Pass event to
mouse-on-link-p so it can check selected window.
Diffstat (limited to 'lisp/tooltip.el')
| -rw-r--r-- | lisp/tooltip.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index 2e60df02459..c4ac57eac95 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -488,7 +488,7 @@ MSG is either a help string to display, or nil to cancel the display." (setq pos (posn-at-x-y (car pos) (cdr pos) (car mp))) (windowp (posn-window pos))) (with-current-buffer (window-buffer (posn-window pos)) - (if (mouse-on-link-p (posn-point pos)) + (if (mouse-on-link-p pos) (setq msg (concat (cond ((eq mouse-1-click-follows-link 'double) "double-") |