From 630bbe39327ee289016145fe0c184310616b5ec8 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 16 Jul 2022 13:52:20 +0200 Subject: Weed out some false positives in help-fns--mention-first-release * lisp/help-fns.el (help-fns--mention-first-release): Weed out things that give too many false positives (bug#49062). --- lisp/help-fns.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'lisp/help-fns.el') diff --git a/lisp/help-fns.el b/lisp/help-fns.el index fbd40158701..85984c87e2d 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -837,6 +837,15 @@ the C sources, too." (unless (memq 'help-fns--customize-variable-version help-fns--activated-functions) (when-let ((first (and (symbolp object) + ;; Weed out things that probably aren't + ;; official things (so that we don't say + ;; "Introduced in version 1.1" if the user + ;; has done `(setq a 42)'). + (or (string-search "-" (symbol-name object)) + (and (boundp object) + (get object 'variable-documentation)) + (and (fboundp object) + (documentation object))) (help-fns--first-release object)))) (with-current-buffer standard-output (insert (format " Probably introduced at or before Emacs version %s.\n" -- cgit v1.2.3