diff options
Diffstat (limited to 'ennu-html.el')
-rw-r--r-- | ennu-html.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ennu-html.el b/ennu-html.el index 36796d1..9a24f9c 100644 --- a/ennu-html.el +++ b/ennu-html.el @@ -18,11 +18,11 @@ ;; TODO: Pass title through org-export-data-with-backend or something ;; similar in order to export org syntax in title (defun ennu-export-post (path desc backend) - (let ((post (concat (expand-file-name path (ennu-setting :posts-directory)) + (let ((filename (concat (expand-file-name path (ennu-setting :posts-directory)) ".org"))) (xmlgen `(a :href ,(expand-file-name* path (ennu-setting :posts-directory)) - ,(or desc (plist-get (ennu-post-metadata post) :title)))))) + ,(or desc (ennu-post-title (ennu-read-post filename))))))) (org-link-set-parameters "post" :export 'ennu-export-post) |