diff options
Diffstat (limited to 'lisp/descr-text.el')
| -rw-r--r-- | lisp/descr-text.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/descr-text.el b/lisp/descr-text.el index 1228d9ed1b4..0194b7169c6 100644 --- a/lisp/descr-text.el +++ b/lisp/descr-text.el @@ -588,7 +588,7 @@ as well as widgets, buttons, overlays, and text properties." (if (cadr x) (length (car x)) 0)) item-list))) (help-setup-xref nil (interactive-p)) - (with-output-to-temp-buffer (help-buffer) + (with-help-window (help-buffer) (with-current-buffer standard-output (set-buffer-multibyte multibyte-p) (let ((formatter (format "%%%ds:" max-width))) @@ -685,8 +685,7 @@ as well as widgets, buttons, overlays, and text properties." (if text-props-desc (insert text-props-desc)) (setq help-xref-stack-item (list 'help-insert-string (buffer-string))) - (toggle-read-only 1) - (print-help-return-message))))) + (toggle-read-only 1))))) (defalias 'describe-char-after 'describe-char) (make-obsolete 'describe-char-after 'describe-char "22.1") |