diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-11-20 09:38:13 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-11-20 09:38:13 +0100 |
commit | b06259357a2d94626ce1addcb6c14b506a984fb8 (patch) | |
tree | c05d4c8fdfaa74fde876eafe4bb1007a54296480 | |
parent | e257da172c60cfbc6ac371117ef13d0c54280c7b (diff) | |
parent | 0bdf18befde4765290d06bf11c2bf332ff5f0fe6 (diff) | |
download | org-mode-b06259357a2d94626ce1addcb6c14b506a984fb8.tar.gz |
Merge branch 'maint'
-rw-r--r-- | testing/lisp/test-ob.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el index a03df7b..1b6897f 100644 --- a/testing/lisp/test-ob.el +++ b/testing/lisp/test-ob.el @@ -26,15 +26,15 @@ should still return the link." (should (let ((default-directory temporary-file-directory)) (org-test-with-temp-text - " + " * Test #+<point>BEGIN_SRC emacs-lisp :file test.txt :cache yes (message \"test\") #+END_SRC" - ;; Execute twice as the first time creates the cache. - (org-babel-execute-src-block) - (string= (concat default-directory "test.txt") - (org-babel-execute-src-block)))))) + ;; Execute twice as the first time creates the cache. + (org-babel-execute-src-block) + (string= (expand-file-name "test.txt") + (org-babel-execute-src-block)))))) (ert-deftest test-ob/multi-line-header-regexp () (should(equal "^[ \t]*#\\+headers?:[ \t]*\\([^\n]*\\)$" |