Function: filesets-data-set-default

filesets-data-set-default is a byte-compiled function defined in filesets.el.gz.

Signature

(filesets-data-set-default SYM VAL)

Documentation

Set the default for filesets-data.

Source Code

;; Defined in /usr/src/emacs/lisp/filesets.el.gz
(defun filesets-data-set-default (sym val)
  "Set the default for `filesets-data'."
  (if filesets-menu-use-cached-flag
      (setq filesets-menu-use-cached-flag nil)
    (when (default-boundp 'filesets-data)
      (let ((modified-filesets
	     (filesets-filter-list val
				   (lambda (x)
				     (let ((name (car x))
					   (data (cdr x)))
				       (let ((elt (assoc name filesets-data)))
					 (or (not elt)
					     (not (equal data (cdr elt))))))))))
	(dolist (x modified-filesets)
	  (filesets-reset-fileset (car x))))))
  (filesets-set-default sym val))