Cleanup secrets-tests

* test/lisp/net/secrets-tests.el (secrets-test03-items)
(secrets-test04-search): Cleanup "session" collection initially.

diff --git a/test/lisp/net/secrets-tests.el b/test/lisp/net/secrets-tests.el
index b501fa602d050785456df791651bc30889bfac3e..9aa79dab0ebf97a87a8896fd82c3896e1e9fbe7b 100644 (file)
--- a/test/lisp/net/secrets-tests.el
+++ b/test/lisp/net/secrets-tests.el
@@ -154,6 +154,9 @@
       (let (item-path)
        (should (secrets-open-session))
 
+        ;; Cleanup.  There could be items in the "session" collection.
+        (secrets--test-delete-all-session-items)
+
        ;; There shall be no items in the "session" collection.
        (should-not (secrets-list-items "session"))
        ;; There shall be items in the "Login" collection.
@@ -215,6 +218,9 @@
       (progn
        (should (secrets-open-session))
 
+        ;; Cleanup.  There could be items in the "session" collection.
+        (secrets--test-delete-all-session-items)
+
        ;; There shall be no items in the "session" collection.
        (should-not (secrets-list-items "session"))