emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/denote 90a7f826a4 3/3: denote-test: define test for den


From: ELPA Syncer
Subject: [elpa] externals/denote 90a7f826a4 3/3: denote-test: define test for denote--format-front-matter
Date: Mon, 5 Jun 2023 03:57:38 -0400 (EDT)

branch: externals/denote
commit 90a7f826a4199747301625f62f0e4192ba149646
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    denote-test: define test for denote--format-front-matter
---
 tests/denote-test.el | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/tests/denote-test.el b/tests/denote-test.el
index 9e4bf0dd34..0dc353e7b8 100644
--- a/tests/denote-test.el
+++ b/tests/denote-test.el
@@ -187,5 +187,30 @@ Extend what we do in 
`denote-test--denote-file-type-extensions'."
                 (member ".org.age" extensions)
                 (member ".txt.age" extensions)))))
 
+(ert-deftest denote-test--denote--format-front-matter ()
+  "Test that `denote--format-front-matter' formats front matter correctly."
+  (should (and (equal (denote--format-front-matter "" "" '("") "" 'text)
+                      "title:      
+date:       
+tags:       
+identifier: 
+---------------------------
+
+")
+               (equal
+                ;; (denote--format-front-matter
+                ;;  "Some test" (denote--date nil 'org) '("one" "two")
+                ;;  (format-time-string denote-id-format nil) 'org)
+                (denote--format-front-matter
+                 "Some test" "2023-06-05" '("one" "two")
+                 "20230605T102234" 'text)
+                "title:      Some test
+date:       2023-06-05
+tags:       one  two
+identifier: 20230605T102234
+---------------------------
+
+"))))
+
 (provide 'denote-test)
 ;;; denote-test.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]