diff options
author | Martin Rudalics <rudalics@gmx.at> | 2008-09-17 06:52:00 +0000 |
---|---|---|
committer | Martin Rudalics <rudalics@gmx.at> | 2008-09-17 06:52:00 +0000 |
commit | 2cf7c3d1677012bff79e9a5128d095f3f9d70191 (patch) | |
tree | 5f6434fbfe6fc201e7f906e09bcf16c6c88efeb8 /lisp/info.el | |
parent | ba0421242c849d8ef3226b9406bd624c1a8ebc7d (diff) | |
download | emacs-2cf7c3d1677012bff79e9a5128d095f3f9d70191.tar.gz |
(Info-follow-nearest-node): Don't raise an error for
mouse-1 clicks.
Diffstat (limited to 'lisp/info.el')
-rw-r--r-- | lisp/info.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el index ac04643d0fa..3b7603a2f83 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -3123,6 +3123,10 @@ If FORK is a string, it is the name to use for the new buffer." (Info-goto-node (Info-extract-menu-item (match-string-no-properties 1)) fork) t))) + (and (eq this-command 'Info-mouse-follow-nearest-node) + ;; Don't raise an error when mouse-1 is bound to this - it's + ;; often used to simply select the window or frame. + (eq 'mouse-1 (event-basic-type last-input-event))) (error "Point neither on reference nor in menu item description"))) ;; Common subroutine. |