mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-25 11:02:53 +00:00
Code Releases Activity

Merge branch 'bugfix'

Browse source
This commit is contained in:
Ihor Radchenko 2023-01-06 18:06:26 +03:00
parent a08c37603f 41ebc2e40c
commit b58fbaf834
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
testing/lisp/test-ob-octave.el
View file

@ -79,7 +79,7 @@ sombrero;
(org-babel-execute-src-block)
(should (search-forward (format "[[file:%s]]" file) nil nil))
(should (file-readable-p file))
(should-not (get-buffer "*Org-Babel Error Output*")))
(should-not (buffer-live-p (get-buffer "*Org-Babel Error Output*"))))
;; clean-up
(delete-file file)
(when (get-buffer "*Org-Babel Error Output*")
@ -99,7 +99,7 @@ sombrero;
(should (get-buffer "*Inferior Octave*"))
(should (search-forward (format "[[file:%s]]" file) nil nil))
(should (file-readable-p file))
(should-not (get-buffer "*Org-Babel Error Output*")))
(should-not (buffer-live-p (get-buffer "*Org-Babel Error Output*"))))
;; clean-up
(delete-file file)
(let (kill-buffer-query-functions kill-buffer-hook)
@ -119,7 +119,7 @@ sombrero;
(org-babel-execute-src-block)
(should (search-forward (format "[[file:%s]]" file) nil nil))
(should (file-readable-p file))
(should-not (get-buffer "*Org-Babel Error Output*")))
(should-not (buffer-live-p (get-buffer "*Org-Babel Error Output*"))))
;; clean-up
(delete-file file)
(when (get-buffer "*Org-Babel Error Output*")