Function: auth-source-pass--build-result-many

auth-source-pass--build-result-many is a byte-compiled function defined in auth-source-pass.el.gz.

Signature

(auth-source-pass--build-result-many HOSTS PORTS USERS REQUIRE MAX)

Documentation

Return multiple auth-source-pass--build-result values.

Source Code

;; Defined in /usr/src/emacs/lisp/auth-source-pass.el.gz
(defun auth-source-pass--build-result-many (hosts ports users require max)
  "Return multiple `auth-source-pass--build-result' values."
  (unless (listp hosts) (setq hosts (list hosts)))
  (unless (listp users) (setq users (list users)))
  (unless (listp ports) (setq ports (list ports)))
  (let* ((auth-source-pass--match-regexp (auth-source-pass--match-regexp
                                          auth-source-pass-port-separator))
         (rv (auth-source-pass--find-match-many hosts users ports
                                                require (or max 1))))
    (when auth-source-debug
      (auth-source-pass--do-debug "final result: %S" rv))
    (let (out)
      (dolist (e rv out)
        (when-let* ((s (plist-get e :secret)) ; not captured by closure in 29.1
                    (v (auth-source--obfuscate s)))
          (setf (plist-get e :secret)
                (lambda () (auth-source--deobfuscate v))))
        (push e out)))))