diff options
-rw-r--r-- | ennum.el | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -361,7 +361,9 @@ result as a string." (seq-mapcat 'ennum-publish-link (ennum-post-links post))))) (defun ennum-publish-generic (other-files-directory file) - (let ((interned-file (ennum-intern file))) + (let ((interned-file (ennum-intern + (ennum--file-join other-files-directory + file)))) (ennum-exp (let ((output-file (pcase (file-name-extension file) @@ -728,7 +730,8 @@ as keys. Keys are compared using `equal'." (ennum--filter-map 'ennum-post-thumbnail posts)) ;; Publish other files (seq-map (apply-partially 'ennum-publish-generic other-files-directory) - (ennum-directory-files other-files-directory)))))) + (ennum-with-current-directory (ennum-setting :other-files-directory) + (ennum-directory-files))))))) ;; Replace old output directory (when (file-exists-p (ennum-setting :output-directory)) (ennum--set-file-modes-recursively (ennum-setting :output-directory) #o755 #o644 #o755) |