diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2017-09-10 22:22:55 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2017-09-10 22:31:23 -0700 |
| commit | 74b8615fcceba7b92c4938e1bcc92015f10ae899 (patch) | |
| tree | 5f8d8002fb0dcf6fc20509f9e3c69ab41d85fc0c | |
| parent | 739593d68742f45e4e35dfc99573c47a5031b646 (diff) | |
| download | emacs-74b8615fcceba7b92c4938e1bcc92015f10ae899.tar.gz emacs-74b8615fcceba7b92c4938e1bcc92015f10ae899.tar.bz2 emacs-74b8615fcceba7b92c4938e1bcc92015f10ae899.zip | |
Adjust ob-tangle to new copy-file behavior
* lisp/org/ob-tangle.el (org-babel-tangle-publish):
Port to new copy-file behavior.
| -rw-r--r-- | lisp/org/ob-tangle.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/org/ob-tangle.el b/lisp/org/ob-tangle.el index 3b0533261c6..2dc55caf89c 100644 --- a/lisp/org/ob-tangle.el +++ b/lisp/org/ob-tangle.el @@ -197,6 +197,7 @@ Return a list whose CAR is the tangled file name." "Tangle FILENAME and place the results in PUB-DIR." (unless (file-exists-p pub-dir) (make-directory pub-dir t)) + (setq pub-dir (file-name-as-directory pub-dir)) (mapc (lambda (el) (copy-file el pub-dir t)) (org-babel-tangle-file filename))) ;;;###autoload |