[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 94c3b9df14 1/2: Tweak private function for front
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 94c3b9df14 1/2: Tweak private function for front matter format |
Date: |
Thu, 4 Aug 2022 21:57:29 -0400 (EDT) |
branch: externals/denote
commit 94c3b9df14ca8192b5ad56b22aa97d7e1a378c49
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Tweak private function for front matter format
---
denote.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/denote.el b/denote.el
index 7f3ffbf44d..9e08fcee36 100644
--- a/denote.el
+++ b/denote.el
@@ -750,15 +750,15 @@ TITLE, DATE, KEYWORDS, FILENAME, ID are all strings which
are
Optional FILETYPE is one of the values of `denote-file-type',
else that variable is used."
- (let ((kw-space (denote--file-meta-keywords keywords 'text))
- (kw-md (denote--file-meta-keywords keywords 'md))
- (kw-colon (denote--file-meta-keywords keywords)))
- ;; TODO 2022-08-04: Rewrite this.
+ (let ((kw-md (denote--file-meta-keywords keywords 'md)))
(pcase (or filetype denote-file-type)
('markdown-toml (format denote-toml-front-matter title date kw-md id))
('markdown-yaml (format denote-yaml-front-matter title date kw-md id))
- ('text (format denote-text-front-matter title date kw-space id
denote-text-front-matter-delimiter))
- (_ (format denote-org-front-matter title date kw-colon id)))))
+ ('text (format denote-text-front-matter title date
+ (denote--file-meta-keywords keywords 'text)
+ id denote-text-front-matter-delimiter))
+ (_ (format denote-org-front-matter title date
+ (denote--file-meta-keywords keywords) id)))))
(defun denote--path (title keywords &optional dir id)
"Return path to new file with TITLE and KEYWORDS.