[Emacs-diffs] Changes to emacs/lisp/custom.el

[Kim F. Storm]

Index: emacs/lisp/custom.el
diff -c emacs/lisp/custom.el:1.62 emacs/lisp/custom.el:1.63
*** emacs/lisp/custom.el:1.62   Mon Dec 23 13:40:55 2002
--- emacs/lisp/custom.el        Tue Jan  7 13:33:18 2003
***************
*** 481,486 ****
--- 481,497 ----
      (unless (member load loads)
        (put symbol 'custom-loads (cons (purecopy load) loads)))))
  
+ (defun custom-autoload (symbol load)
+   "Mark SYMBOL as autoloaded custom variable and add dependency LOAD."
+   (put symbol 'custom-autoload t)
+   (custom-add-load symbol load))
+ 
+ ;; This test is also in the C code of `user-variable-p'.
+ (defun custom-variable-p (variable)
+   "Return non-nil if VARIABLE is a custom variable."
+   (or (get variable 'standard-value)
+       (get variable 'custom-autoload)))
+ 
  ;;; Loading files needed to customize a symbol.
  ;;; This is in custom.el because menu-bar.el needs it for toggle cmds.