diff options
Diffstat (limited to 'tests/test-gloss-fetch--multi-source-walks-registry.el')
| -rw-r--r-- | tests/test-gloss-fetch--multi-source-walks-registry.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/test-gloss-fetch--multi-source-walks-registry.el b/tests/test-gloss-fetch--multi-source-walks-registry.el index fe04e02..cb2b730 100644 --- a/tests/test-gloss-fetch--multi-source-walks-registry.el +++ b/tests/test-gloss-fetch--multi-source-walks-registry.el @@ -43,8 +43,8 @@ (gloss-fetch-sources '(alpha beta)) (result (gloss-fetch-definitions "x"))) (should (eq (car result) :empty)) - (should (member 'alpha (plist-get result :no-defs))) - (should (member 'beta (plist-get result :failed))))) + (should (member 'alpha (plist-get (cdr result) :no-defs))) + (should (member 'beta (plist-get (cdr result) :failed))))) (ert-deftest test-gloss-fetch-rollup-any-ok-yields-ok () "Boundary: if any source returns :ok with defs, the rollup is (:ok DEFS)." |