Function: custom-unsaved-options

custom-unsaved-options is a byte-compiled function defined in cus-edit.el.gz.

Signature

(custom-unsaved-options)

Documentation

List of options and faces set in this session but not saved.

Each entry is of the form (SYMBOL TYPE), where TYPE is one of the symbols custom-face or custom-variable.

Source Code

;; Defined in /usr/src/emacs/lisp/cus-edit.el.gz
(defun custom-unsaved-options ()
  "List of options and faces set in this session but not saved.
Each entry is of the form (SYMBOL TYPE), where TYPE is one of the
symbols `custom-face' or `custom-variable'."
  (let ((found nil))
    (mapatoms (lambda (symbol)
		(and (or (get symbol 'customized-face)
			 (get symbol 'customized-face-comment))
                     (facep symbol)
		     (push (list symbol 'custom-face) found))
		(and (or (get symbol 'customized-value)
			 (get symbol 'customized-variable-comment))
		     (boundp symbol)
		     (push (list symbol 'custom-variable) found))))
    found))