[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 1e5760ed786: (auth-source-backend): Don't pass obsolete "name" ar
From: |
Stefan Monnier |
Subject: |
master 1e5760ed786: (auth-source-backend): Don't pass obsolete "name" arg |
Date: |
Sat, 28 Oct 2023 01:17:13 -0400 (EDT) |
branch: master
commit 1e5760ed786667113d4e144504ca7a981d25cf37
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
(auth-source-backend): Don't pass obsolete "name" arg
* lisp/auth-source.el (auth-source-backends-parser-file)
(auth-source-backends-parser-macos-keychain)
(auth-source-backends-parser-secrets): Remove unused "name" argument
to `auth-source-backend` constructor.
---
lisp/auth-source.el | 6 ------
1 file changed, 6 deletions(-)
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 365f6697ec8..583b6e57897 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -387,7 +387,6 @@ soon as a function returns non-nil.")
(cond
((equal extension "plist")
(auth-source-backend
- source
:source source
:type 'plstore
:search-function #'auth-source-plstore-search
@@ -395,13 +394,11 @@ soon as a function returns non-nil.")
:data (plstore-open source)))
((member-ignore-case extension '("json"))
(auth-source-backend
- source
:source source
:type 'json
:search-function #'auth-source-json-search))
(t
(auth-source-backend
- source
:source source
:type 'netrc
:search-function #'auth-source-netrc-search
@@ -449,7 +446,6 @@ soon as a function returns non-nil.")
(setq source (symbol-name source)))
(auth-source-backend
- (format "Mac OS Keychain (%s)" source)
:source source
:type keychain-type
:search-function #'auth-source-macos-keychain-search
@@ -490,7 +486,6 @@ soon as a function returns non-nil.")
(if (featurep 'secrets)
(auth-source-backend
- (format "Secrets API (%s)" source)
:source source
:type 'secrets
:search-function #'auth-source-secrets-search
@@ -498,7 +493,6 @@ soon as a function returns non-nil.")
(auth-source-do-warn
"auth-source-backend-parse: no Secrets API, ignoring spec: %S" entry)
(auth-source-backend
- (format "Ignored Secrets API (%s)" source)
:source ""
:type 'ignore))))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 1e5760ed786: (auth-source-backend): Don't pass obsolete "name" arg,
Stefan Monnier <=