From d97e9d701d18c2033f07fd244497311cc4b4477c Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 8 Feb 2022 08:24:30 +0100 Subject: [PATCH] Fix some standard-output/help-buffer confusion in describe-function-1 * lisp/help-fns.el (describe-function-1): We're outputting to standard-output, so deconfuse slightly. --- lisp/help-fns.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index e6cc07b471d..5da575aa8d1 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -959,9 +959,9 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)." ;;;###autoload (defun describe-function-1 (function) - (let ((pt1 (with-current-buffer (help-buffer) (point)))) + (let ((pt1 (with-current-buffer standard-output (point)))) (help-fns-function-description-header function) - (with-current-buffer (help-buffer) + (with-current-buffer standard-output (let ((inhibit-read-only t)) (fill-region-as-paragraph (save-excursion -- 2.39.5