tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

fixup! test-ob-python: Disable test failing on CI when using older Emacs

Browse source
This commit is contained in:
Ihor Radchenko 2022-11-16 16:31:40 +08:00
parent 5c247fb27b
commit a831c18baf
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B
1 changed files with 31 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
testing/lisp/test-ob-python.el
View file

@ -164,7 +164,7 @@ value
(ert-deftest test-ob-python/assign-underscore () (ert-deftest test-ob-python/assign-underscore ()
;; Disable the test on older Emacs as built-in python.el sometimes ;; Disable the test on older Emacs as built-in python.el sometimes
;; fail. ;; fail to initialize session.
(skip-unless (version<= "28" emacs-version)) (skip-unless (version<= "28" emacs-version))
(let ((result (let ((result
(org-test-with-temp-text "#+begin_src python :session :results value (org-test-with-temp-text "#+begin_src python :session :results value
@ -202,6 +202,9 @@ return text
(org-babel-execute-src-block))))) (org-babel-execute-src-block)))))
(ert-deftest test-ob-python/session-value-sleep () (ert-deftest test-ob-python/session-value-sleep ()
;; Disable the test on older Emacs as built-in python.el sometimes
;; fail to initialize session.
(skip-unless (version<= "28" emacs-version))
(should (should
(equal "success" (equal "success"
(org-test-with-temp-text "#+begin_src python :session :results value (org-test-with-temp-text "#+begin_src python :session :results value
@ -212,6 +215,9 @@ time.sleep(.1)
(org-babel-execute-src-block))))) (org-babel-execute-src-block)))))
(ert-deftest test-ob-python/async-simple-session-output () (ert-deftest test-ob-python/async-simple-session-output ()
;; Disable the test on older Emacs as built-in python.el sometimes
;; fail to initialize session.
(skip-unless (version<= "28" emacs-version))
(let ((org-babel-temporary-directory temporary-file-directory) (let ((org-babel-temporary-directory temporary-file-directory)
(org-confirm-babel-evaluate nil)) (org-confirm-babel-evaluate nil))
(org-test-with-temp-text (org-test-with-temp-text
@ -229,6 +235,9 @@ print('Yep!')
(org-babel-read-result))))))))) (org-babel-read-result)))))))))
(ert-deftest test-ob-python/async-named-output () (ert-deftest test-ob-python/async-named-output ()
;; Disable the test on older Emacs as built-in python.el sometimes
;; fail to initialize session.
(skip-unless (version<= "28" emacs-version))
(let (org-confirm-babel-evaluate (let (org-confirm-babel-evaluate
(org-babel-temporary-directory temporary-file-directory) (org-babel-temporary-directory temporary-file-directory)
(src-block "#+begin_src python :async :session :results output (src-block "#+begin_src python :async :session :results output
@ -253,6 +262,9 @@ print(\"Yep!\")
(buffer-string))))))) (buffer-string)))))))
(ert-deftest test-ob-python/async-output-drawer () (ert-deftest test-ob-python/async-output-drawer ()
;; Disable the test on older Emacs as built-in python.el sometimes
;; fail to initialize session.
(skip-unless (version<= "28" emacs-version))
(let (org-confirm-babel-evaluate (let (org-confirm-babel-evaluate
(org-babel-temporary-directory temporary-file-directory) (org-babel-temporary-directory temporary-file-directory)
(src-block "#+begin_src python :async :session :results output drawer (src-block "#+begin_src python :async :session :results output drawer