diff options
Diffstat (limited to 'tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el')
| -rw-r--r-- | tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el b/tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el index 8067dde..8bd0019 100644 --- a/tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el +++ b/tests/test-gloss-fetch--definitions-timeout-returns-unreachable.el @@ -19,9 +19,9 @@ (gloss-fetch-test--with-mocked-url (lambda (_url) nil) (let ((result (gloss-fetch-definitions "anaphora"))) - (should (eq (car result) :empty)) - (should (member 'wiktionary (plist-get (cdr result) :failed))) - (should-not (plist-get (cdr result) :no-defs))))) + (should-not (plist-get result :defs)) + (should (member 'wiktionary (plist-get result :failed))) + (should-not (plist-get result :no-defs))))) (ert-deftest test-gloss-fetch-definitions-timeout-marks-source-unreachable () "Boundary: per-source status is :unreachable, distinct from :server-error." |