From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 15 Jul 2018 07:47:08 +0000 (+0200)
Subject: Fix Bug#32147
X-Git-Tag: emacs-27.0.90~4667
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=02db06fc8ebc06519088505b033fd6819a71bef8;p=emacs.git

Fix Bug#32147

* test/lisp/net/secrets-tests.el (secrets-test02-collections)
(secrets-test03-items): Test for both "Login" or "login"
collection.  (Bug#32147)
---

diff --git a/test/lisp/net/secrets-tests.el b/test/lisp/net/secrets-tests.el
index 9aa79dab0eb..de3ce731bec 100644
--- a/test/lisp/net/secrets-tests.el
+++ b/test/lisp/net/secrets-tests.el
@@ -92,7 +92,8 @@
 	(should (secrets-open-session))
 
 	;; There must be at least the collections "Login" and "session".
-	(should (member "Login" (secrets-list-collections)))
+	(should (or (member "Login" (secrets-list-collections))
+                    (member "login" (secrets-list-collections))))
 	(should (member "session" (secrets-list-collections)))
 
 	;; Create a random collection.  This asks for a password
@@ -160,7 +161,8 @@
 	;; There shall be no items in the "session" collection.
 	(should-not (secrets-list-items "session"))
 	;; There shall be items in the "Login" collection.
-	(should (secrets-list-items "Login"))
+	(should (or (secrets-list-items "Login")
+                    (secrets-list-items "login")))
 
 	;; Create a new item.
 	(should (setq item-path (secrets-create-item "session" "foo" "secret")))