Function: auth-source-file-name-p

auth-source-file-name-p is a byte-compiled function defined in auth-source.el.gz.

Signature

(auth-source-file-name-p FILE)

Documentation

Say whether FILE is used by auth-sources.

Source Code

;; Defined in /usr/src/emacs/lisp/auth-source.el.gz
;; (mapcar #'auth-source-backend-parse auth-sources)

(defun auth-source-file-name-p (file)
  "Say whether FILE is used by `auth-sources'."
  (let* ((backends (mapcar #'auth-source-backend-parse auth-sources))
         (files
          (mapcar (lambda (x)
                    (when (member (slot-value x 'type) '(json netrc plstore))
                      (slot-value x 'source)))
                  backends)))
    (member (expand-file-name file)
            (mapcar #'expand-file-name (remq nil files)))))