mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 11:02:53 +00:00
Merge branch 'bugfix'
This commit is contained in:
commit
b58fbaf834
|
@ -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*")
|
||||
|
|
Loading…
Reference in a new issue