Mercurial > emacs
changeset 20064:697360ed5e4b
(widget-button-click): Move point to where clicked.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 15 Oct 1997 23:57:19 +0000 |
parents | 8de4c2591c49 |
children | 34f94bc812c3 |
files | lisp/wid-edit.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/wid-edit.el Wed Oct 15 23:55:45 1997 +0000 +++ b/lisp/wid-edit.el Wed Oct 15 23:57:19 1997 +0000 @@ -922,8 +922,9 @@ :group 'widget-faces) (defun widget-button-click (event) - "Invoke button below mouse pointer." + "Invoke the button that the mouse is pointing at, and move there." (interactive "@e") + (mouse-set-point event) (cond ((and (fboundp 'event-glyph) (event-glyph event)) (widget-glyph-click event))