diff options
| -rw-r--r-- | lisp/emacs-lisp/eldoc.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index bcf3a84d319..7a705001833 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el | |||
| @@ -595,8 +595,11 @@ documentation themselves." | |||
| 595 | (defvar eldoc--enthusiasm-curbing-timer nil | 595 | (defvar eldoc--enthusiasm-curbing-timer nil |
| 596 | "Timer used by `eldoc-documentation-enthusiast' to avoid blinking.") | 596 | "Timer used by `eldoc-documentation-enthusiast' to avoid blinking.") |
| 597 | 597 | ||
| 598 | (defalias 'eldoc #'eldoc-print-current-symbol-info) | ||
| 599 | |||
| 598 | (defun eldoc-print-current-symbol-info () | 600 | (defun eldoc-print-current-symbol-info () |
| 599 | "Document thing at point." | 601 | "Document thing at point." |
| 602 | (interactive) | ||
| 600 | (if (not (eldoc-display-message-p)) | 603 | (if (not (eldoc-display-message-p)) |
| 601 | ;; Erase the last message if we won't display a new one. | 604 | ;; Erase the last message if we won't display a new one. |
| 602 | (when eldoc-last-message | 605 | (when eldoc-last-message |