瀏覽代碼

Merge branch 'maint'

Kyle Meyer 10 年之前
父節點
當前提交
24b05a5f54
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/ob-tangle.el

+ 1 - 1
lisp/ob-tangle.el

@@ -179,7 +179,7 @@ Return a list whose CAR is the tangled file name."
 	(save-window-excursion
 	  (find-file file)
 	  (setq to-be-removed (current-buffer))
-	  (org-babel-tangle nil target-file lang))
+	  (mapcar #'expand-file-name (org-babel-tangle nil target-file lang)))
       (unless visited-p
 	(kill-buffer to-be-removed)))))