summaryrefslogtreecommitdiff
path: root/ennu-html.el
diff options
context:
space:
mode:
Diffstat (limited to 'ennu-html.el')
-rw-r--r--ennu-html.el4
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)