[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 66f60c9bef 3/4: Fix denote-test--denote-sluggify
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/denote 66f60c9bef 3/4: Fix denote-test--denote-sluggify-keywords |
|
Date: |
Mon, 27 Nov 2023 03:57:57 -0500 (EST) |
branch: externals/denote
commit 66f60c9bef62da54110c44a5b1d4d45b7bb0b9cd
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Fix denote-test--denote-sluggify-keywords
---
tests/denote-test.el | 9 ++-------
1 file changed, 2 insertions(+), 7 deletions(-)
diff --git a/tests/denote-test.el b/tests/denote-test.el
index 0b2d981cdf..26a601b5d7 100644
--- a/tests/denote-test.el
+++ b/tests/denote-test.el
@@ -103,13 +103,8 @@ Otherwise, this is like `denote-test--denote-sluggify'."
The function also account for the value of the user option
`denote-allow-multi-word-keywords'."
(should
- (let ((denote-allow-multi-word-keywords nil))
- (equal (denote-sluggify-keywords '("one !@# one" " two" "__ three
__"))
- '("oneone" "two" "three"))))
- (should
- (let ((denote-allow-multi-word-keywords t))
- (equal (denote-sluggify-keywords '("one !@# one" " two" "__ three
__"))
- '("one-one" "two" "three")))))
+ (equal (denote-sluggify-keywords '("one !@# one" " two" "__ three __"))
+ '("oneone" "two" "three"))))
(ert-deftest denote-test--denote-desluggify ()
"Test that `denote-desluggify' upcases first character and de-hyphenates
string."