1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-25 19:11:56 +00:00

Run secrets suite test when Emacs has dbus support

* test/lisp/net/secrets-tests.el (secrets-test00-availability)
(secrets-test01-sessions, secrets-test02-collections)
(secrets-test03-items, secrets-test04-search): Skip test
unless Emacs is compiled with dbus support.
This commit is contained in:
Tino Calancha 2018-04-06 08:55:39 +09:00
parent b6aea79b00
commit 51c8369fa2

View File

@ -28,6 +28,7 @@
(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))
@ -58,6 +59,7 @@
(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))
@ -83,6 +85,7 @@
(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))
@ -144,6 +147,7 @@
(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))
@ -185,6 +189,7 @@
(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))