master 630bbe3932: Weed out some false positives in help-fns--mention-first-release

[Lars Ingebrigtsen]

branch: master
commit 630bbe39327ee289016145fe0c184310616b5ec8
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    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(+)

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index fbd4015870..85984c87e2 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"