diff options
| author | Tino Calancha | 2018-04-06 08:55:39 +0900 |
|---|---|---|
| committer | Tino Calancha | 2018-04-06 09:01:21 +0900 |
| commit | 51c8369fa2b7dac9e609431ddbc86765ad1ea9b4 (patch) | |
| tree | f4e33a3781426627fe0d8288d74050981e14e9be /test | |
| parent | b6aea79b008c7fcb9aea60a33709f94a734532f8 (diff) | |
| download | emacs-51c8369fa2b7dac9e609431ddbc86765ad1ea9b4.tar.gz emacs-51c8369fa2b7dac9e609431ddbc86765ad1ea9b4.zip | |
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.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/net/secrets-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/lisp/net/secrets-tests.el b/test/lisp/net/secrets-tests.el index dc9c7f1004a..352a7c362dd 100644 --- a/test/lisp/net/secrets-tests.el +++ b/test/lisp/net/secrets-tests.el | |||
| @@ -28,6 +28,7 @@ | |||
| 28 | 28 | ||
| 29 | (ert-deftest secrets-test00-availability () | 29 | (ert-deftest secrets-test00-availability () |
| 30 | "Test availability of Secret Service API." | 30 | "Test availability of Secret Service API." |
| 31 | (skip-unless (featurep 'dbusbind)) | ||
| 31 | :expected-result (if secrets-enabled :passed :failed) | 32 | :expected-result (if secrets-enabled :passed :failed) |
| 32 | (should secrets-enabled) | 33 | (should secrets-enabled) |
| 33 | (should (dbus-ping :session secrets-service)) | 34 | (should (dbus-ping :session secrets-service)) |
| @@ -58,6 +59,7 @@ | |||
| 58 | 59 | ||
| 59 | (ert-deftest secrets-test01-sessions () | 60 | (ert-deftest secrets-test01-sessions () |
| 60 | "Test opening / closing a secrets session." | 61 | "Test opening / closing a secrets session." |
| 62 | (skip-unless (featurep 'dbusbind)) | ||
| 61 | (skip-unless secrets-enabled) | 63 | (skip-unless secrets-enabled) |
| 62 | (skip-unless (secrets-empty-path secrets-session-path)) | 64 | (skip-unless (secrets-empty-path secrets-session-path)) |
| 63 | 65 | ||
| @@ -83,6 +85,7 @@ | |||
| 83 | 85 | ||
| 84 | (ert-deftest secrets-test02-collections () | 86 | (ert-deftest secrets-test02-collections () |
| 85 | "Test creation / deletion a secrets collections." | 87 | "Test creation / deletion a secrets collections." |
| 88 | (skip-unless (featurep 'dbusbind)) | ||
| 86 | (skip-unless secrets-enabled) | 89 | (skip-unless secrets-enabled) |
| 87 | (skip-unless (secrets-empty-path secrets-session-path)) | 90 | (skip-unless (secrets-empty-path secrets-session-path)) |
| 88 | 91 | ||
| @@ -144,6 +147,7 @@ | |||
| 144 | 147 | ||
| 145 | (ert-deftest secrets-test03-items () | 148 | (ert-deftest secrets-test03-items () |
| 146 | "Test creation / deletion a secret item." | 149 | "Test creation / deletion a secret item." |
| 150 | (skip-unless (featurep 'dbusbind)) | ||
| 147 | (skip-unless secrets-enabled) | 151 | (skip-unless secrets-enabled) |
| 148 | (skip-unless (secrets-empty-path secrets-session-path)) | 152 | (skip-unless (secrets-empty-path secrets-session-path)) |
| 149 | 153 | ||
| @@ -185,6 +189,7 @@ | |||
| 185 | 189 | ||
| 186 | (ert-deftest secrets-test04-search () | 190 | (ert-deftest secrets-test04-search () |
| 187 | "Test searching of secret items." | 191 | "Test searching of secret items." |
| 192 | (skip-unless (featurep 'dbusbind)) | ||
| 188 | (skip-unless secrets-enabled) | 193 | (skip-unless secrets-enabled) |
| 189 | (skip-unless (secrets-empty-path secrets-session-path)) | 194 | (skip-unless (secrets-empty-path secrets-session-path)) |
| 190 | 195 | ||