瀏覽代碼

Fix false test failure

* testing/lisp/test-org.el (test-org/refile-get-targets): Fix false
failures when test temp-file path contains a symlink.

TINYCHANGE
Galen Menzel 7 年之前
父節點
當前提交
8fa6c015a4
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      testing/lisp/test-org.el

+ 1 - 1
testing/lisp/test-org.el

@@ -5497,7 +5497,7 @@ Paragraph<point>"
   ;; full file name.
   (should
    (org-test-with-temp-text-in-file "* H1"
-     (let* ((filename (buffer-file-name))
+     (let* ((filename (file-truename (buffer-file-name)))
 	    (org-refile-use-outline-path 'full-file-path)
 	    (org-refile-targets `(((,filename) :level . 1))))
        (member filename (mapcar #'car (org-refile-get-targets))))))