[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 7183877bd4 2/2: Reword the denote--replace-conse
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 7183877bd4 2/2: Reword the denote--replace-consecutive-token-characters doc string |
Date: |
Tue, 30 Jul 2024 06:57:47 -0400 (EDT) |
branch: externals/denote
commit 7183877bd49d82371cf38b38ac7b30bcbc1caf0c
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Reword the denote--replace-consecutive-token-characters doc string
---
denote.el | 13 ++++++-------
1 file changed, 6 insertions(+), 7 deletions(-)
diff --git a/denote.el b/denote.el
index 29357d9efd..1d9781cf46 100644
--- a/denote.el
+++ b/denote.el
@@ -966,13 +966,12 @@ a single one in str, if necessary according to COMPONENT."
(defun denote-sluggify (component str)
"Make STR an appropriate slug for file name COMPONENT.
-Apply the function specified in `denote-file-name-slug-function'
-to COMPONENT which is one of `title', `signature', `keyword'. If
-the resulting string still contains consecutive -,_,= or @, they
-are replaced by a single occurence of the character, if necessary
-according to COMPONENT. If COMPONENT is `keyword', remove
-underscores from STR as they are used as the keywords separator
-in file names."
+Apply the function specified in `denote-file-name-slug-function' to
+COMPONENT which is one of `title', `signature', `keyword'. If the
+resulting string still contains consecutive -, _, =, or @, they are
+replaced by a single occurence of the character, if necessary according
+to COMPONENT. If COMPONENT is `keyword', remove underscores from STR as
+they are used as the keywords separator in file names."
(let* ((slug-function (alist-get component denote-file-name-slug-functions))
(str-slug (cond ((eq component 'title)
(funcall (or slug-function #'denote-sluggify-title)
str))