* lisp/menu-bar.el (yank-menu-length): Fix docstring (bug#51138).

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 03bbc979a9cea6cf155d2a3ab07631438c11b59f..2b759a5a5c5ff0872652337b69199a4fb289ceb6 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -823,7 +823,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)."
                            ;; Advised & aliased function.
                            (and advised (symbolp real-function)
                                 (not (eq 'autoload (car-safe def))))
-                           (and (subrp def)
+                           (and (subrp def) (symbolp function)
                                 (not (string= (subr-name def)
                                               (symbol-name function)))))))
         (real-def (cond

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index b2577c085fc2101e6ac00124067cffb50b4589f5..1cc126b5017de8e35d688323465d2125991d1eec 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -2159,7 +2159,7 @@ otherwise it could decide to silently do nothing."
     (> count 1)))
 
 (defcustom yank-menu-length 20
-  "Maximum length to display in the `yank-menu'."
+  "Text of items in `yank-menu' longer than this will be truncated."
   :type 'integer
   :group 'menu)