From 967570352107d75e1683c83717e12807fc6a2cf2 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 20 Jul 1999 16:38:23 +0000 Subject: [PATCH] (describe-variable): Fix test for customizability. --- lisp/help.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/help.el b/lisp/help.el index b0ca05a7474..d2da9a55b5a 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -768,9 +768,9 @@ Returns the documentation as a string, also." ;; Note, it is not reliable to test only for a custom-type property ;; because those are only present after the var's definition ;; has been loaded. - (if (or (user-variable-p variable) - (get variable 'custom-loads) - (get variable 'custom-type)) + (if (or (get variable 'custom-type) ; after defcustom + (get variable 'custom-loads) ; from loaddefs.el + (get variable 'standard-value)) ; from cus-start.el (let ((customize-label "customize")) (terpri) (terpri) -- 2.39.5