From 13eb72d26e421da3eb699eda7a4215177854ff31 Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Tue, 7 Jan 2003 19:17:46 +0000 Subject: [PATCH] (describe-variable): Use custom-variable-p. --- lisp/help-fns.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 46a72b32ba2..2b61cd88d47 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -464,12 +464,7 @@ it is displayed along with the global value." (terpri)) (princ (or doc "Not documented as a variable."))) ;; Make a link to customize if this variable can be customized. - ;; 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 (get variable 'custom-type) ; after defcustom - (get variable 'custom-loads) ; from loaddefs.el - (get variable 'standard-value)) ; from cus-start.el + (if (custom-variable-p variable) (let ((customize-label "customize")) (terpri) (terpri) -- 2.39.2