(when (and alist
(or default
(equal item "machine")))
- (auth-source-do-trivia
- "auth-source-netrc-parse-entries: got entry %S" alist)
+ ;; (auth-source-do-trivia
+ ;; "auth-source-netrc-parse-entries: got entry %S" alist)
(setq all (funcall adder check alist all)
alist nil))
;; In default entries, we don't have a next token.
;; Clean up: if there's an entry left over, use it.
(when alist
(setq all (funcall adder check alist all))
- (auth-source-do-trivia
- "auth-source-netrc-parse-entries: got2 entry %S" alist))
+ ;; (auth-source-do-trivia
+ ;; "auth-source-netrc-parse-entries: got2 entry %S" alist)
+ )
(nreverse all)))
(defvar auth-source-passphrase-alist nil)