Merge branch 'maint'

This commit is contained in:
Kyle Meyer 2015-10-03 18:09:56 -04:00
commit c8f2eec425
1 changed files with 2 additions and 0 deletions

View File

@ -185,6 +185,8 @@ Return a list whose CAR is the tangled file name."
(defun org-babel-tangle-publish (_ filename pub-dir) (defun org-babel-tangle-publish (_ filename pub-dir)
"Tangle FILENAME and place the results in 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))) (mapc (lambda (el) (copy-file el pub-dir t)) (org-babel-tangle-file filename)))
;;;###autoload ;;;###autoload