Strip leading directory from other files.

* ennum.el (ennum-publish): Strip leading directory from other files.
(ennum-publish-generic): Prepend other files directory to find the
source file.

1 files changed, 5 insertions, 2 deletions

diff --git a/ennum.el b/ennum.el
index 57b76cd..d52b2df 100644
--- a/ennum.el
+++ b/ennum.el
@@ -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)