From bbc34d3762326ea13e9a10a959ea5b59aadb6736 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 5 May 2020 17:53:23 -0400 Subject: [PATCH] Try and improve the *Help* layout for things like `diff-refine`. * lisp/help-fns.el (describe-variable-custom-version-info): Follow the usual format of other `help-fns-describe-variable-functions`. --- lisp/help-fns.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 0a99b8d6a36..63b066f3b85 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -893,7 +893,7 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound." (output nil)) (if custom-version (setq output - (format "This %s was introduced, or its default value was changed, in\nversion %s of Emacs.\n" + (format " This %s was introduced, or its default value was changed, in\n version %s of Emacs.\n" type custom-version)) (when cpv (let* ((package (car-safe cpv)) @@ -904,7 +904,7 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound." (emacsv (cdr (assoc version pkg-versions)))) (if (and package version) (setq output - (format (concat "This %s was introduced, or its default value was changed, in\nversion %s of the %s package" + (format (concat " This %s was introduced, or its default value was changed, in\n version %s of the %s package" (if emacsv (format " that is part of Emacs %s" emacsv)) ".\n") @@ -1125,8 +1125,8 @@ it is displayed along with the global value." ;; Note variable's version or package version. (let ((output (describe-variable-custom-version-info variable))) (when output - (terpri) - (terpri) + ;; (terpri) + ;; (terpri) (princ output))))) (add-hook 'help-fns-describe-variable-functions #'help-fns--var-safe-local) -- 2.39.5