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)))
 

Reply via email to