Function: auth-source-pass--retrieve-parsed

auth-source-pass--retrieve-parsed is a byte-compiled function defined in auth-source-pass.el.gz.

Signature

(auth-source-pass--retrieve-parsed SEEN PATH PORT-NUMBER-P)

Source Code

;; Defined in /usr/src/emacs/lisp/auth-source-pass.el.gz
(defun auth-source-pass--retrieve-parsed (seen path port-number-p)
  (when (string-match auth-source-pass--match-regexp path)
    (puthash path
             `( :host ,(or (match-string 10 path) (match-string 11 path))
                ,@(if-let* ((tr (match-string 21 path)))
                      (list :user tr :suffix t)
                    (list :user (match-string 20 path)))
                :port ,(and-let* ((p (or (match-string 30 path)
                                         (match-string 31 path)))
                                  (n (string-to-number p)))
                         (if (or (zerop n) (not port-number-p))
                             (format "%s" p)
                           n)))
             seen)))