From acf27407c43ba48be21b8f75a1c791d2c45db57a Mon Sep 17 00:00:00 2001 From: Matthew Trzcinski Date: Sun, 21 Apr 2024 16:02:40 +0200 Subject: [PATCH 1/3] testing/lisp/test-ob-shell.el: Test shebang/cmdline results * test-ob-shell.el (test-cmdline-alone-and-with-shebang-have-same-result): Test that results when using the cmdline header alone are the same as when paired with the shebang header. --- testing/lisp/test-ob-shell.el | 37 +++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) diff --git a/testing/lisp/test-ob-shell.el b/testing/lisp/test-ob-shell.el index 8cebd8467..b0c15b07d 100644 --- a/testing/lisp/test-ob-shell.el +++ b/testing/lisp/test-ob-shell.el @@ -362,6 +362,43 @@ echo 3 "- 1\n- 2\n- 3\n" (buffer-substring-no-properties (point) (point-max)))))) +(ert-deftest test-cmdline-alone-and-with-shebang-have-same-result () + "Pass arguments to a block. Don't use shebang. Then use +shebang set to the same language as the block. The result should +be the same." + (should (equal + (org-test-with-temp-text + "#+begin_src bash :cmdline 1 2 3 +echo \"$1\" + +#+end_src" + (org-babel-execute-src-block)) + (org-test-with-temp-text + "#+begin_src bash :cmdline 1 2 3 :shebang #!/usr/bin/env bash +echo \"$1\" + +#+end_src" + (org-babel-execute-src-block))))) + +(ert-deftest test-cmdline-alone-and-with-shebang-have-same-result-2 () + "Pass arguments to a block. Don't use shebang. Then use +shebang set to the same language as the block. The result should +be the same." + (should (equal + (org-test-with-temp-text + "#+begin_src bash :cmdline \"1 2\" 3 +echo \"$1\" + +#+end_src" + (org-babel-execute-src-block)) + (org-test-with-temp-text + "#+begin_src bash :cmdline \"1 2\" 3 :shebang #!/usr/bin/env bash +echo \"$1\" + +#+end_src" + (org-babel-execute-src-block))))) + + ;;; Standard output -- 2.41.0