From 77e194971c5370856a63cf02397d79f85d6b342b Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 22 Feb 2021 22:34:03 +0100 Subject: [PATCH] Buttonize function values in help (and add a blank line) * lisp/help-fns.el (describe-variable): Add a newline for better readability (bug#46702). This also has the side effect of buttonizing `function-references-like-this' in the "Its value is" part. * lisp/help-mode.el (help-make-xrefs): Adjust comments. --- lisp/help-fns.el | 2 +- lisp/help-mode.el | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index ceb6bc09015..72446950948 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -1026,7 +1026,7 @@ it is displayed along with the global value." (princ (if file-name (progn (princ (format-message - " is a variable defined in `%s'.\n" + " is a variable defined in `%s'.\n\n" (if (eq file-name 'C-source) "C source code" (help-fns-short-filename file-name)))) diff --git a/lisp/help-mode.el b/lisp/help-mode.el index 30a1ce053c1..6fd3d40fe3c 100644 --- a/lisp/help-mode.el +++ b/lisp/help-mode.el @@ -476,8 +476,7 @@ that." (with-current-buffer (or buffer (current-buffer)) (save-excursion (goto-char (point-min)) - ;; Skip the header-type info, though it might be useful to parse - ;; it at some stage (e.g. "function in `library'"). + ;; Skip the first bit, which has already been buttonized. (forward-paragraph) (let ((old-modified (buffer-modified-p))) (let ((stab (syntax-table)) -- 2.39.2