forked from mirrors/org-mode
ob-tangle: Check that publishing directory exists
* lisp/ob-tangle.el (org-babel-tangle-publish): Create publishing directory if it doesn't exist. Reported-by: Arun Isaac <theroarofthedragon@gmail.com> <http://permalink.gmane.org/gmane.emacs.orgmode/101697>
This commit is contained in:
parent
ee3d9363c5
commit
2c349cc65a
|
@ -185,6 +185,8 @@ Return a list whose CAR is the tangled file name."
|
|||
|
||||
(defun org-babel-tangle-publish (_ filename pub-dir)
|
||||
"Tangle FILENAME and place the results in PUB-DIR."
|
||||
(unless (file-exists-p pub-dir)
|
||||
(make-directory pub-dir t))
|
||||
(mapc (lambda (el) (copy-file el pub-dir t)) (org-babel-tangle-file filename)))
|
||||
|
||||
;;;###autoload
|
||||
|
|
Loading…
Reference in a new issue