diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index a37e64502dc..3ae98c08a39 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -352,7 +352,7 @@ See `find-variable' for more details." Point is saved if FUNCTION is in the current buffer." (interactive "kFind function on key: ") (save-excursion - (let* ((event (aref key 0)) + (let* ((event (and (eventp key) (aref key 0))) ; Null event OK below. (start (event-start event)) (modifiers (event-modifiers event)) (window (and (or (memq 'click modifiers) (memq 'down modifiers) |