emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Add oauth2 customize group (resolve FIXME)


From: Naoya Yamashita
Subject: Add oauth2 customize group (resolve FIXME)
Date: Fri, 19 Feb 2021 10:16:53 +0900 (JST)

Hi, thanks for maintaining such a great project!

I find oauth2 ELPA package and also find a easy FIXME comment.
This patch add a new group and changed all customization
variables to belong to it.

Regards,
Naoya
>From b6619724abc1f268eb3b68bc9077f899f9d70bea Mon Sep 17 00:00:00 2001
From: Naoya Yamashita <conao3@gmail.com>
Date: Fri, 19 Feb 2021 09:56:48 +0900
Subject: [PATCH] * packages/oauth2/oauth2.el: Add oauth2 group and use it

(oauth2): New group.
(oauth2-token-file): Belongs to it.
---
 oauth2.el | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/oauth2.el b/oauth2.el
index 43c4e9e4d4..43e48c1dbe 100644
--- a/oauth2.el
+++ b/oauth2.el
@@ -47,6 +47,12 @@
 (defvar url-callback-arguments)
 (defvar url-callback-function)
 
+(defgroup oauth2 nil
+  "OAuth 2.0 Authorization Protocol."
+  :group 'comm
+  :link '(url-link :tag "Savannah" 
"http://git.savannah.gnu.org/cgit/emacs/elpa.git/tree/?h=externals/oauth2";)
+  :link '(url-link :tag "ELPA" "https://elpa.gnu.org/packages/oauth2.html";))
+
 (defun oauth2-request-authorization (auth-url client-id &optional scope state 
redirect-uri)
   "Request OAuth authorization at AUTH-URL by launching `browse-url'.
 CLIENT-ID is the client id provided by the provider.
@@ -149,8 +155,7 @@ TOKEN should be obtained with `oauth2-request-access'."
 
 (defcustom oauth2-token-file (concat user-emacs-directory "oauth2.plstore")
   "File path where store OAuth tokens."
-  ;; FIXME: This var doesn't belong to any group.  Either add it to some
-  ;; pre-existing group or create an `oauth2' group for it.
+  :group 'oauth2
   :type 'file)
 
 (defun oauth2-compute-id (auth-url token-url scope)
-- 
2.30.0


reply via email to

[Prev in Thread] Current Thread [Next in Thread]