From 97672efdb0b21b688cf532011b7e10706b102534 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Thu, 13 Oct 2022 18:28:56 +0800 Subject: [PATCH] testing/lisp/test-ob-eshell.el: Fix tests * testing/lisp/test-ob-eshell.el (ob-eshell/execute): (ob-eshell/variables-assignment): Do not expect `org-babel-execute-src-block' to return the actual inserted src block string. --- testing/lisp/test-ob-eshell.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/testing/lisp/test-ob-eshell.el b/testing/lisp/test-ob-eshell.el index 4430a21c7..0d704b16a 100644 --- a/testing/lisp/test-ob-eshell.el +++ b/testing/lisp/test-ob-eshell.el @@ -34,7 +34,10 @@ "#+begin_src eshell echo 2 #+end_src" - (org-babel-execute-src-block)) + (org-babel-execute-src-block) + (goto-char (org-babel-where-is-src-block-result)) + (forward-line) + (buffer-substring-no-properties (point) (line-end-position))) ": 2"))) (ert-deftest ob-eshell/variables-assignment () @@ -45,7 +48,10 @@ echo 2 "#+begin_src eshell :var hi=\"hello, world\" echo $hi #+end_src" - (org-babel-execute-src-block)) + (org-babel-execute-src-block) + (goto-char (org-babel-where-is-src-block-result)) + (forward-line) + (buffer-substring-no-properties (point) (line-end-position))) ": hello, world"))) (ert-deftest ob-eshell/session ()