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:
parent
b6aea79b00
commit
51c8369fa2
1 changed files with 5 additions and 0 deletions
|
@ -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))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue