Function: custom-unloaded-symbol-p

custom-unloaded-symbol-p is a byte-compiled function defined in cus-edit.el.gz.

Signature

(custom-unloaded-symbol-p SYMBOL)

Documentation

Return non-nil if the dependencies of SYMBOL have not yet been loaded.

Source Code

;; Defined in /usr/src/emacs/lisp/cus-edit.el.gz
(defun custom-unloaded-symbol-p (symbol)
  "Return non-nil if the dependencies of SYMBOL have not yet been loaded."
  (let ((found nil)
	(loads (get symbol 'custom-loads))
	load)
    (while loads
      (setq load (car loads)
	    loads (cdr loads))
      (cond ((symbolp load)
	     (unless (featurep load)
	       (setq found t)))
	    ((assoc load load-history))
	    ((assoc (locate-library load) load-history)
	     (message nil))
	    (t
	     (setq found t))))
    found))