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

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

[elpa] externals/tomelr c0962ba15f 33/84: fix: Don't run plist to TOML c


From: ELPA Syncer
Subject: [elpa] externals/tomelr c0962ba15f 33/84: fix: Don't run plist to TOML conversion test on emacs 26.3 and older
Date: Tue, 3 May 2022 09:58:10 -0400 (EDT)

branch: externals/tomelr
commit c0962ba15f0cf7ff944e822f623b2800b5ebfd73
Author: Kaushal Modi <kaushal.modi@gmail.com>
Commit: Kaushal Modi <kaushal.modi@gmail.com>

    fix: Don't run plist to TOML conversion test on emacs 26.3 and older
---
 test/tplist.el | 41 ++++++++++++++++++++++-------------------
 1 file changed, 22 insertions(+), 19 deletions(-)

diff --git a/test/tplist.el b/test/tplist.el
index db2e7152c2..844ec11101 100644
--- a/test/tplist.el
+++ b/test/tplist.el
@@ -24,22 +24,25 @@
 ;;; Code:
 (require 'tomelr)
 
+;; The plist conversion to TOML fails on emacs 26.3 and older
+;; versions.
+(unless (version< emacs-version "27")
 ;;;; S-exp objects as plists
-(ert-deftest test-plist ()
-  (let ((inp '((:int 123
-                :remove_this_key  nil
-                :str "abc"
-                :bool_false :false
-                :bool_true t
-                :int_list (1 2 3)
-                :str_list ("a" "b" "c")
-                :bool_list (t :false t :false)
-                :list_of_lists [(1 2) (3 4 5)]
-                ;; TODO plist specification of TOML tables is not yet 
supported.
-                ;; :map (:key1 123
-                ;;       :key2 "xyz")
-                )))
-        (ref '("int = 123
+  (ert-deftest test-plist ()
+    (let ((inp '((:int 123
+                  :remove_this_key  nil
+                  :str "abc"
+                  :bool_false :false
+                  :bool_true t
+                  :int_list (1 2 3)
+                  :str_list ("a" "b" "c")
+                  :bool_list (t :false t :false)
+                  :list_of_lists [(1 2) (3 4 5)]
+                  ;; TODO plist specification of TOML tables is not yet 
supported.
+                  ;; :map (:key1 123
+                  ;;       :key2 "xyz")
+                  )))
+          (ref '("int = 123
 str = \"abc\"
 bool_false = false
 bool_true = true
@@ -47,10 +50,10 @@ int_list = [ 1, 2, 3 ]
 str_list = [ \"a\", \"b\", \"c\" ]
 bool_list = [ true, false, true, false ]
 list_of_lists = [ [ 1, 2 ], [ 3, 4, 5 ] ]"))
-        out)
-    (dolist (el inp)
-      (push (tomelr-encode el) out))
-    (should (equal ref (nreverse out)))))
+          out)
+      (dolist (el inp)
+        (push (tomelr-encode el) out))
+      (should (equal ref (nreverse out))))))
 
 
 (provide 'tplist)



reply via email to

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