Function: nnimap-credentials

nnimap-credentials is a byte-compiled function defined in nnimap.el.gz.

Signature

(nnimap-credentials ADDRESS PORTS USER)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnimap.el.gz
(defun nnimap-credentials (address ports user)
  (let* ((auth-source-creation-prompts
          '((user  . "IMAP user at %h: ")
            (secret . "IMAP password for %u@%h: ")))
         (found (nth 0 (auth-source-search :max 1
                                           :host address
                                           :port ports
                                           :user user
                                           :require '(:user :secret)
                                           :create t))))
    (if found
        (list (plist-get found :user)
	      (auth-info-password found)
	      (plist-get found :save-function))
      nil)))