diff options
| author | David Kastrup <dak@gnu.org> | 2006-09-15 08:53:18 +0000 |
|---|---|---|
| committer | David Kastrup <dak@gnu.org> | 2006-09-15 08:53:18 +0000 |
| commit | 91a2acb229ac102ef15866174fb2d62c8e36598c (patch) | |
| tree | 5d23741ece50bf6da9e72a6b51aadc74a54f7c61 /lisp/mouse-sel.el | |
| parent | b74e16a384ddbded12eb7e8c7250253614554641 (diff) | |
| download | emacs-91a2acb229ac102ef15866174fb2d62c8e36598c.tar.gz emacs-91a2acb229ac102ef15866174fb2d62c8e36598c.tar.bz2 emacs-91a2acb229ac102ef15866174fb2d62c8e36598c.zip | |
* mouse-sel.el (mouse-sel-follow-link-p): Use event position
instead of buffer position for `mouse-on-link-p'.
* mouse.el (mouse-posn-property): New function looking up the
properties at a click position in overlays and text properties in
either buffer or strings.
(mouse-on-link-p): Use `mouse-posn-property' to streamline lookup
of both `follow-link' as well as `mouse-face' properties.
(mouse-drag-track): Check `mouse-on-link-p' on event position, not
buffer position.
* help.el (describe-key-briefly): When reading a down-event on
mode lines or scroll bar, swallow the following up event, too.
Use the new mouse sensitity of `key-binding' for lookup.
(describe-key): The same here.
Diffstat (limited to 'lisp/mouse-sel.el')
| -rw-r--r-- | lisp/mouse-sel.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el index a64dabaec81..a327b589f54 100644 --- a/lisp/mouse-sel.el +++ b/lisp/mouse-sel.el @@ -702,7 +702,7 @@ Sel mode does not support using a `double' value to follow links using double-clicks." (and initial final mouse-1-click-follows-link (eq (car initial) 'down-mouse-1) - (mouse-on-link-p (posn-point (event-start initial))) + (mouse-on-link-p (event-start initial)) (= (posn-point (event-start initial)) (posn-point (event-end final))) (= (event-click-count initial) 1) |