diff options
| author | Richard M. Stallman | 1999-04-08 16:46:15 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1999-04-08 16:46:15 +0000 |
| commit | a4bb8336f90a47a99d6c779bbef2e500edb63083 (patch) | |
| tree | b01cc1eb996912032a1b2fe151588132b73cd39b | |
| parent | 5cf1c7acbf6b014075f7a9e5862ed87c68dd29f6 (diff) | |
| download | emacs-a4bb8336f90a47a99d6c779bbef2e500edb63083.tar.gz emacs-a4bb8336f90a47a99d6c779bbef2e500edb63083.zip | |
(describe-variable): Check custom-loads property as well as custom-type.
| -rw-r--r-- | lisp/help.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/help.el b/lisp/help.el index df28f62d102..5214d6fda94 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -766,7 +766,9 @@ Returns the documentation as a string, also." | |||
| 766 | ;; Note, it is not reliable to test only for a custom-type property | 766 | ;; Note, it is not reliable to test only for a custom-type property |
| 767 | ;; because those are only present after the var's definition | 767 | ;; because those are only present after the var's definition |
| 768 | ;; has been loaded. | 768 | ;; has been loaded. |
| 769 | (if (or (user-variable-p variable) (get variable 'custom-type)) | 769 | (if (or (user-variable-p variable) |
| 770 | (get variable 'custom-loads) | ||
| 771 | (get variable 'custom-type)) | ||
| 770 | (let ((customize-label "customize")) | 772 | (let ((customize-label "customize")) |
| 771 | (terpri) | 773 | (terpri) |
| 772 | (terpri) | 774 | (terpri) |