From 0bdf18befde4765290d06bf11c2bf332ff5f0fe6 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 20 Nov 2016 09:36:42 +0100 Subject: [PATCH] test-ob: Fix failing test on MacOS * testing/lisp/test-ob.el (test-ob/indented-cached-org-bracket-link): Use `expand-file-name' to prevent introducing "//" patterns in file name. Reported-by: David Talmage --- testing/lisp/test-ob.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el index a03df7b40..1b6897f03 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 #+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]*\\)$"