aboutsummaryrefslogtreecommitdiff
path: root/ennu.el
diff options
context:
space:
mode:
authorArun Isaac2019-08-26 13:46:34 +0530
committerArun Isaac2019-08-26 13:46:34 +0530
commit7d03d10334a1589a6a9d96affdb49da310f584e2 (patch)
tree7e852c04b6d01c1f6d71a32551b1ae43b3a752e2 /ennu.el
parentc4c87049805730f791a69a8a47702a13afe31c07 (diff)
downloadennum-7d03d10334a1589a6a9d96affdb49da310f584e2.tar.gz
ennum-7d03d10334a1589a6a9d96affdb49da310f584e2.tar.lz
ennum-7d03d10334a1589a6a9d96affdb49da310f584e2.zip
Clean up ennu--post-metadata-memoized.
* ennu.el (ennu--post-metadata-memoized): Combine treatment of :title and :date properties into a single clause.
Diffstat (limited to 'ennu.el')
-rw-r--r--ennu.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/ennu.el b/ennu.el
index 76485a3..8aa2c85 100644
--- a/ennu.el
+++ b/ennu.el
@@ -267,9 +267,9 @@ with two arguments -- the key and the value."
(ennu-plist-map-to-plist
(lambda (key value)
(pcase key
- (:title (funcall export (first (plist-get metadata :title))))
- (:date (org-timestamp-to-time (first (plist-get metadata :date))))
- (:author (funcall export (first (plist-get metadata :author))))))
+ ((or :author :title)
+ (funcall export (first (plist-get metadata key))))
+ (:date (org-timestamp-to-time (first (plist-get metadata :date))))))
metadata))))
(defvar ennu-mandatory-metadata