Tests: (org-ql-test-show-result) Fix symbol
This commit is contained in:
parent
c4f9a58fd6
commit
fc536cafd6
1 changed files with 1 additions and 1 deletions
|
|
@ -92,7 +92,7 @@ Set at runtime by test suite.")
|
|||
(if-let* ((sexp (elisp--preceding-sexp))
|
||||
(sexp (pcase sexp
|
||||
(`(org-ql . ,_) (setf (car sexp) 'org-ql-agenda))
|
||||
(`(org-ql-expect ,ql-args . ,_) (setf sexp `(org-ql-select org-ql-test-buffer
|
||||
(`(org-ql-expect ,ql-args . ,_) (setf sexp `(org-ql-search org-ql-test-buffer
|
||||
',@ql-args)))
|
||||
(_ nil))))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue