aboutsummaryrefslogtreecommitdiff
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)