about summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2022-08-15 00:27:02 +0530
committerArun Isaac2022-08-15 00:27:02 +0530
commitd4db2699ed44e468d8f4c083bade11e7a1ab9ca3 (patch)
tree8e2568687cb875871dface9ef81b2aa68bd8cf62
parent3d596d98948b89299ed7a793c5158fb7c537e7f8 (diff)
downloadennum-d4db2699ed44e468d8f4c083bade11e7a1ab9ca3.tar.gz
ennum-d4db2699ed44e468d8f4c083bade11e7a1ab9ca3.tar.lz
ennum-d4db2699ed44e468d8f4c083bade11e7a1ab9ca3.zip
Do not double prepend directories to filenames.
The return value of ennum-directory-files now includes the respective
directories. There is no need to prepend the directory again.

* ennum.el (ennum-posts, ennum-publish-generic): Do not prepend
directory to filename.
-rw-r--r--ennum.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/ennum.el b/ennum.el
index fa0e794..31e5e5f 100644
--- a/ennum.el
+++ b/ennum.el
@@ -159,8 +159,7 @@ respectively by - and _, and the pad character = is optional."
                 (ennum--filter-map
                  (lambda (file)
                    (when (string= (file-name-extension file) "org")
-                     (ennum-read-post
-                      (ennum--file-join (ennum-setting :posts-directory) file))))
+                     (ennum-read-post file)))
                  (ennum-directory-files (ennum-setting :posts-directory)))))
            ;; Group posts by translation group.
            (seq-group-by
@@ -330,8 +329,7 @@ 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
-                        (ennum--file-join other-files-directory file))))
+  (let ((interned-file (ennum-intern file)))
     (ennum-exp
      (let ((output-file
             (pcase (file-name-extension file)