test-ob/org-babel-read: Fix for Emacs 27

* testing/lisp/test-ob.el (test-ob/org-babel-read): Do not use `dlet'
that is not yet available in Emacs 27.
This commit is contained in:
Ihor Radchenko 2024-05-03 16:25:00 +03:00
parent 09520a056c
commit dbea900d60
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 2 additions and 1 deletions

View File

@ -2590,7 +2590,8 @@ abc
[1 2 (foo)]) [1 2 (foo)])
(org-babel-read "[1 2 (foo)]" inhibit))) (org-babel-read "[1 2 (foo)]" inhibit)))
;; Special case: *this* literal is evaluated ;; Special case: *this* literal is evaluated
(dlet ((*this* 100)) (defvar *this* nil)
(let ((*this* 100))
(should (should
(equal (equal
(if inhibit "*this*" 100) (if inhibit "*this*" 100)