(ert-deftest secrets-test00-availability ()
"Test availability of Secret Service API."
+ (skip-unless (featurep 'dbusbind))
:expected-result (if secrets-enabled :passed :failed)
(should secrets-enabled)
(should (dbus-ping :session secrets-service))
(ert-deftest secrets-test01-sessions ()
"Test opening / closing a secrets session."
+ (skip-unless (featurep 'dbusbind))
(skip-unless secrets-enabled)
(skip-unless (secrets-empty-path secrets-session-path))
(ert-deftest secrets-test02-collections ()
"Test creation / deletion a secrets collections."
+ (skip-unless (featurep 'dbusbind))
(skip-unless secrets-enabled)
(skip-unless (secrets-empty-path secrets-session-path))
(ert-deftest secrets-test03-items ()
"Test creation / deletion a secret item."
+ (skip-unless (featurep 'dbusbind))
(skip-unless secrets-enabled)
(skip-unless (secrets-empty-path secrets-session-path))
(ert-deftest secrets-test04-search ()
"Test searching of secret items."
+ (skip-unless (featurep 'dbusbind))
(skip-unless secrets-enabled)
(skip-unless (secrets-empty-path secrets-session-path))