diff options
| author | Arun Isaac | 2019-08-26 13:46:34 +0530 |
|---|---|---|
| committer | Arun Isaac | 2019-08-26 13:46:34 +0530 |
| commit | 7d03d10334a1589a6a9d96affdb49da310f584e2 (patch) | |
| tree | 7e852c04b6d01c1f6d71a32551b1ae43b3a752e2 | |
| parent | c4c87049805730f791a69a8a47702a13afe31c07 (diff) | |
| download | ennum-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.
| -rw-r--r-- | ennu.el | 6 |
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 |