branch: elpa/base32
commit f27043d432a8ff4d7201dabf53c0bea37064a5bc
Author: Vivek Das Mohapatra <[email protected]>
Commit: Vivek Das Mohapatra <[email protected]>
Fix some byte compilation warnings
- unused variable
- deprecated function alias
---
totp.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/totp.el b/totp.el
index a14a724262..106ef1eacf 100644
--- a/totp.el
+++ b/totp.el
@@ -311,14 +311,14 @@ same, ie probably intended for the same target."
(defun totp-get-backend-for-secret (s)
"Return the backend in which secret S is store, or the default backend."
- (let (backends vault default target secrets secret)
+ (let (backends vault default target secrets)
(setq backends (totp-storage-backends)
default (car backends))
(while (and (not target) backends)
(setq vault (car backends)
secrets (totp-get-secrets-from-backend vault)
backends (cdr backends))
- (if (member* s secrets :test 'totp-same-secret)
+ (if (cl-member s secrets :test 'totp-same-secret)
(setq target vault)))
(or target default)))