branch: externals/org
commit 840cb395aa519ef78599adacc2c3300e77e89107
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@posteo.net>

    test-org-capture/entry: Fix Emacs 27 compatibility
    
    * testing/lisp/test-org-capture.el (test-org-capture/entry): Use
    `org-dlet' instead of `dlet' that is not yet available in Emacs 27.
---
 testing/lisp/test-org-capture.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/testing/lisp/test-org-capture.el b/testing/lisp/test-org-capture.el
index a42e619453..4aed0e99e6 100644
--- a/testing/lisp/test-org-capture.el
+++ b/testing/lisp/test-org-capture.el
@@ -244,7 +244,7 @@
    (equal
     "* A\n* B\n** H1 Capture text\n* C\n"
     (org-test-with-temp-text-in-file "* A\n* B\n* C\n"
-      (dlet ((test-org-capture/entry/headline))
+      (org-dlet ((test-org-capture/entry/headline))
         (let* ((file (buffer-file-name))
               (org-capture-templates
                `(("t" "Todo" entry (file+headline ,file 
test-org-capture/entry/headline) "** H1 %?"))))
@@ -285,7 +285,7 @@
    (equal
     "* A\n** B\n*** H1 Capture text\n** C\n"
     (org-test-with-temp-text-in-file "* A\n** B\n** C\n"
-      (dlet ((test-org-capture/entry/file+olp))
+      (org-dlet ((test-org-capture/entry/file+olp))
         (let* ((file (buffer-file-name))
               (org-capture-templates
                `(("t" "Todo" entry (file+olp ,file 
test-org-capture/entry/file+olp) "* H1 %?"))))
@@ -328,7 +328,7 @@
    (equal
     "* A\n** B\n*** 2024\n**** 2024-06 June\n***** 2024-06-16 Sunday\n****** 
H1 Capture text\n** C\n"
     (org-test-with-temp-text-in-file "* A\n** B\n** C\n"
-      (dlet ((test-org-capture/entry/file+olp+datetree))
+      (org-dlet ((test-org-capture/entry/file+olp+datetree))
         (let* ((file (buffer-file-name))
               (org-capture-templates
                `(("t" "Todo" entry (file+olp+datetree ,file 
test-org-capture/entry/file+olp+datetree) "* H1 %?"))))

Reply via email to