[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 37dd43bb22 2/2: Add helper to return all denote-
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 37dd43bb22 2/2: Add helper to return all denote-file-type keys |
Date: |
Mon, 15 Aug 2022 04:57:41 -0400 (EDT) |
branch: externals/denote
commit 37dd43bb22e11a4d9af904d9dbd747582552a1b4
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Add helper to return all denote-file-type keys
We might need this when checking the return value of the file type
heuristics.
---
denote.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/denote.el b/denote.el
index 8578a55452..7eb2565ccf 100644
--- a/denote.el
+++ b/denote.el
@@ -753,6 +753,10 @@ Based on FILE-TYPE."
(plist-get (cdr type) :extension))
denote-file-types)))
+(defun denote--file-type-keys ()
+ "Return all `denote-file-type' keys."
+ (delete-dups (mapcar #'car denote-file-types)))
+
(defun denote--get-title-line-from-front-matter (title file-type)
"Retrieve title line from front matter based on FILE-TYPE.
Format TITLE in the title line. The returned line does not