diff options
Diffstat (limited to 'tests/test-pearl-bugfixes.el')
| -rw-r--r-- | tests/test-pearl-bugfixes.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/test-pearl-bugfixes.el b/tests/test-pearl-bugfixes.el index 9fe2518..c1348f1 100644 --- a/tests/test-pearl-bugfixes.el +++ b/tests/test-pearl-bugfixes.el @@ -133,21 +133,21 @@ ;;; Bug: saved/ad-hoc query filters bypass validation (ert-deftest test-pearl-run-saved-query-validates-before-fetch () - "A saved query with an unknown filter key errors before any fetch." - (let ((pearl-saved-queries '(("bad" :filter (:bogus-key "x")))) + "A local view with an unknown filter key errors before any fetch." + (let ((pearl-local-views '(("bad" :filter (:bogus-key "x")))) (fetched nil)) (cl-letf (((symbol-function 'pearl--query-issues-async) (lambda (&rest _) (setq fetched t)))) - (should-error (pearl-run-saved-query "bad") :type 'user-error) + (should-error (pearl-run-local-view "bad") :type 'user-error) (should-not fetched)))) (ert-deftest test-pearl-run-saved-query-validates-bad-priority () - "A saved query with an out-of-range priority errors before any fetch." - (let ((pearl-saved-queries '(("bad" :filter (:priority 9)))) + "A local view with an out-of-range priority errors before any fetch." + (let ((pearl-local-views '(("bad" :filter (:priority 9)))) (fetched nil)) (cl-letf (((symbol-function 'pearl--query-issues-async) (lambda (&rest _) (setq fetched t)))) - (should-error (pearl-run-saved-query "bad") :type 'user-error) + (should-error (pearl-run-local-view "bad") :type 'user-error) (should-not fetched)))) (provide 'test-pearl-bugfixes) |