testing: Provide more debug info for diary sexps

* testing/org-test.el (org-test-run-batch-tests):
(org-test-run-all-tests): Bind `calendar-debug-sexp' to non-nil when
running tests.

See https://orgmode.org/list/t2hpe9$119m$1@ciao.gmane.io
This commit is contained in:
Ihor Radchenko 2022-10-19 10:28:40 +08:00
parent 4517fba441
commit c41a2198f2
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 6 additions and 2 deletions

View File

@ -457,7 +457,9 @@ Load all test files first."
(let ((org-id-track-globally t)
(org-test-selector
(if org-test-selector org-test-selector "\\(org\\|ob\\)"))
org-confirm-babel-evaluate org-startup-folded vc-handled-backends)
org-confirm-babel-evaluate org-startup-folded vc-handled-backends
;; Catch errors in diary sexps better.
(calendar-debug-sexp t))
(org-test-touch-all-examples)
(org-test-update-id-locations)
(org-test-load)
@ -471,7 +473,9 @@ Load all test files first."
(org-test-touch-all-examples)
(org-test-update-id-locations)
(org-test-load)
(ert "\\(org\\|ob\\)")
(let (;; Catch errors in diary sexps better.
(calendar-debug-sexp t))
(ert "\\(org\\|ob\\)"))
(org-test-kill-all-examples))
(defmacro org-test-at-time (time &rest body)