diff options
author | Arun Isaac | 2022-08-15 00:27:02 +0530 |
---|---|---|
committer | Arun Isaac | 2022-08-15 00:27:02 +0530 |
commit | d4db2699ed44e468d8f4c083bade11e7a1ab9ca3 (patch) | |
tree | 8e2568687cb875871dface9ef81b2aa68bd8cf62 | |
parent | 3d596d98948b89299ed7a793c5158fb7c537e7f8 (diff) | |
download | ennum-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.el | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -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) |