diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-11-26 11:24:20 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-11-26 11:24:20 +0100 |
| commit | 0287c5176867628e7acb834b3d5f26a150cfaf85 (patch) | |
| tree | 14781bfb34515092a3fee93b4a1a5b557f93f6d4 /lisp/emacs-lisp | |
| parent | d23723cfb24b87170f53ce615bff083ef2d7e76a (diff) | |
| download | emacs-0287c5176867628e7acb834b3d5f26a150cfaf85.tar.gz emacs-0287c5176867628e7acb834b3d5f26a150cfaf85.tar.bz2 emacs-0287c5176867628e7acb834b3d5f26a150cfaf85.zip | |
Keep point in the *eldoc* buffer in eldoc-display-in-echo-area
* lisp/emacs-lisp/eldoc.el (eldoc-display-in-echo-area): Use
'save-excursion' to keep point position in *eldoc* buffer.
Suggested by Andrii Kolomoiets <andreyk.mad@gmail.com>.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/eldoc.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 78cb8f08c34..d81060ef165 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -591,7 +591,8 @@ Honor `eldoc-echo-area-use-multiline-p' and ;; format the *eldoc* buffer, using as most of its ;; contents as we know will fit. (with-current-buffer (eldoc--format-doc-buffer docs) - (eldoc--echo-area-substring available))) + (save-excursion + (eldoc--echo-area-substring available)))) (t ;; this is the "truncate brutally" situation (let ((string (with-current-buffer (eldoc--format-doc-buffer docs) |