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.
2024-05-03 16:25:00 +03:00 · 2024-05-03 16:25:00 +03:00 · dbea900d60
parent 09520a056c
commit dbea900d60
1 changed files with 2 additions and 1 deletions
--- a/testing/lisp/test-ob.el
+++ b/testing/lisp/test-ob.el
@ -2590,7 +2590,8 @@ abc
              [1 2 (foo)])
            (org-babel-read "[1 2 (foo)]" inhibit)))
    ;; Special case: *this* literal is evaluated
-    (dlet ((*this* 100))
+    (defvar *this* nil)
+    (let ((*this* 100))
      (should
       (equal
        (if inhibit "*this*" 100)