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

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

[elpa] externals/lentic 48644ea72c 083/333: Tests uncommented, and expec


From: ELPA Syncer
Subject: [elpa] externals/lentic 48644ea72c 083/333: Tests uncommented, and expected failures added.
Date: Tue, 27 Feb 2024 13:00:09 -0500 (EST)

branch: externals/lentic
commit 48644ea72c87c3eed3524baec80c9aec3e5fad3e
Author: Phillip Lord <phillip.lord@newcastle.ac.uk>
Commit: Phillip Lord <phillip.lord@newcastle.ac.uk>

    Tests uncommented, and expected failures added.
---
 test/linked-buffer-test.el | 82 ++++++++++++++++++++++++----------------------
 1 file changed, 42 insertions(+), 40 deletions(-)

diff --git a/test/linked-buffer-test.el b/test/linked-buffer-test.el
index af89e7d966..e95de402e7 100644
--- a/test/linked-buffer-test.el
+++ b/test/linked-buffer-test.el
@@ -47,46 +47,48 @@
     "block-comment.clj" "block-comment-out.tex")))
 
 
-;; (ert-deftest linked-buffer-asciidoc-clojure ()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-asciidoc-clojure-init
-;;     "asciidoc-clj.txt" "asciidoc-clj-out.clj")))
-
-
-;; ;; org mode start up prints out "OVERVIEW" from the cycle. Can't see any way
-;; ;; to stop this
-;; (ert-deftest linked-buffer-org-el ()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-org-el-init
-;;     "org-el.org" "org-el.el")))
-
-;; (ert-deftest linked-buffer-el-org ()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-el-org-init
-;;     "el-org.el" "el-org.org")))
-
-;; (ert-deftest linked-buffer-orgel-org()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-orgel-org-init
-;;     "orgel-org.el" "orgel-org.org")))
-
-;; (ert-deftest linked-buffer-org-orgel()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-org-orgel-init
-;;     "org-orgel.org" "org-orgel.el")))
-
-
-;; (ert-deftest linked-buffer-org-clojure ()
-;;   (should
-;;    (linked-buffer-test-clone-equal
-;;     'linked-buffer-org-clojure-init
-;;     "org-clojure.org" "org-clojure.clj"
-;;     )))
+(ert-deftest linked-buffer-asciidoc-clojure ()
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-asciidoc-clojure-init
+    "asciidoc-clj.txt" "asciidoc-clj-out.clj")))
+
+
+;; org mode start up prints out "OVERVIEW" from the cycle. Can't see any way
+;; to stop this
+(ert-deftest linked-buffer-org-el ()
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-org-el-init
+    "org-el.org" "org-el.el")))
+
+(ert-deftest linked-buffer-el-org ()
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-el-org-init
+    "el-org.el" "el-org.org")))
+
+(ert-deftest linked-buffer-orgel-org()
+  :expected-result :failed
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-orgel-org-init
+    "orgel-org.el" "orgel-org.org")))
+
+(ert-deftest linked-buffer-org-orgel()
+  :expected-result :failed
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-org-orgel-init
+    "org-orgel.org" "org-orgel.el")))
+
+
+(ert-deftest linked-buffer-org-clojure ()
+  (should
+   (linked-buffer-test-clone-equal
+    'linked-buffer-org-clojure-init
+    "org-clojure.org" "org-clojure.clj"
+    )))
 
 ;; Use this to generate a new test file
 



reply via email to

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