[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: oauth2 support for Emacs email clients
From: |
Andrew Cohen |
Subject: |
Re: oauth2 support for Emacs email clients |
Date: |
Wed, 11 Aug 2021 08:54:11 +0800 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux) |
Not that it matters much (I'll be pushing this at some point), but the
patch in my previous email was cutoff. Complete patch below:
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 6919738398..faddbdee1a 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -2120,11 +2120,17 @@ auth-source-plstore-create
(base-secret '(secret))
;; we know (because of an assertion in auth-source-search) that the
;; :create parameter is either t or a list (which includes nil)
- (create-extra (if (eq t create) nil create))
+ (create-secret-extra (plist-get create :encrypted))
+ (create-extra (if (eq t create) nil
+ (or
+ (append
+ (plist-get create :unencrypted) create-secret-extra)
+ create)))
(current-data (car (auth-source-search :max 1
:host host
:port port)))
(required (append base-required create-extra))
+ (required-secret (append base-secret create-secret-extra))
;; `valist' is an alist
valist
;; `artificial' will be returned if no creation is needed
@@ -2213,7 +2219,7 @@ auth-source-plstore-create
(eval default)))))
(when data
- (if (member r base-secret)
+ (if (member r required-secret)
(setq secret-artificial
(plist-put secret-artificial
(auth-source--symbol-keyword r)
--
- Re: oauth2 support for Emacs email clients, (continued)
Re: oauth2 support for Emacs email clients, Gregory Heytings, 2021/08/03
- Re: oauth2 support for Emacs email clients, Roland Winkler, 2021/08/03
- Re: oauth2 support for Emacs email clients, Gregory Heytings, 2021/08/03
- Re: oauth2 support for Emacs email clients, Andrew Cohen, 2021/08/04
- Re: oauth2 support for Emacs email clients, Roland Winkler, 2021/08/10
- Re: oauth2 support for Emacs email clients, Andrew Cohen, 2021/08/10
- Re: oauth2 support for Emacs email clients,
Andrew Cohen <=
- Re: oauth2 support for Emacs email clients, Richard Stallman, 2021/08/11
- Re: oauth2 support for Emacs email clients, Andrew Cohen, 2021/08/11
Re: oauth2 support for Emacs email clients, Arthur Miller, 2021/08/03
Re: oauth2 support for Emacs email clients, Richard Stallman, 2021/08/14
Re: oauth2 support for Emacs email clients, Gregory Heytings, 2021/08/14
Re: oauth2 support for Emacs email clients, Ulrich Mueller, 2021/08/14
Re: Re: oauth2 support for Emacs email clients, Richard Stallman, 2021/08/14