branch: externals/auth-source-xoauth2-plugin
commit 258c4c4803eb1c1362eeeb2a0b3d3f91411efbfd
Author: Xiyue Deng <manp...@gmail.com>
Commit: Xiyue Deng <manp...@gmail.com>

    Simplify string comparison
    
    (Based on review at
    https://debbugs.gnu.org/cgi/bugreport.cgi?bug=72992#14.  Thanks Philip
    Kaludercic for the review and suggestions!)
---
 auth-source-xoauth2-plugin.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/auth-source-xoauth2-plugin.el b/auth-source-xoauth2-plugin.el
index 36cdf15d07..0f536029b7 100644
--- a/auth-source-xoauth2-plugin.el
+++ b/auth-source-xoauth2-plugin.el
@@ -92,8 +92,7 @@ set along `host', `user', and `port' (note the snake_case)."
         (auth-source-do-trivia "Matched auth data: %s" (pp-to-string 
auth-data))
         (let ((auth (plist-get auth-data :auth)))
           (when (and auth
-                     (stringp auth)
-                     (string= auth "xoauth2"))
+                     (equal auth "xoauth2"))
             (auth-source-do-debug
              ":auth set to `xoauth2'.  Will get access token.")
             (let ((auth-url (plist-get auth-data :auth-url))

Reply via email to