WIP: Try to make ERT print whole struct

This probably won't work, but I don't know what else to do...
This commit is contained in:
Adam Porter 2021-07-05 02:24:57 -05:00
parent 24993c9a25
commit 5924b37cb7

View file

@ -41,9 +41,9 @@
;;;; Functions ;;;; Functions
(ert-deftest org-ql--normalize-query ()
(let ((print-level nil) (let ((print-level nil)
(print-length nil)) (print-length nil))
(ert-deftest org-ql--normalize-query ()
(should (equal (org-ql--normalize-query '(or (ts-active :on "2019-01-01") (should (equal (org-ql--normalize-query '(or (ts-active :on "2019-01-01")
(ts-a :on "2019-01-01") (ts-a :on "2019-01-01")
(ts-inactive :on "2019-01-01") (ts-inactive :on "2019-01-01")