aboutsummaryrefslogtreecommitdiffstats
path: root/test/src
diff options
context:
space:
mode:
Diffstat (limited to 'test/src')
-rw-r--r--test/src/data-tests.el4
-rw-r--r--test/src/json-tests.el4
2 files changed, 4 insertions, 4 deletions
diff --git a/test/src/data-tests.el b/test/src/data-tests.el
index 3cd4802a981..d41c7623289 100644
--- a/test/src/data-tests.el
+++ b/test/src/data-tests.el
@@ -484,7 +484,7 @@ comparing the subr with a much slower lisp implementation."
484 (should-have-watch-data `(data-tests-lvar 3 set ,buf1))) 484 (should-have-watch-data `(data-tests-lvar 3 set ,buf1)))
485 (should-have-watch-data `(data-tests-lvar 1 unlet ,buf1)) 485 (should-have-watch-data `(data-tests-lvar 1 unlet ,buf1))
486 (setq-default data-tests-lvar 4) 486 (setq-default data-tests-lvar 4)
487 (should-have-watch-data `(data-tests-lvar 4 set nil)) 487 (should-have-watch-data '(data-tests-lvar 4 set nil))
488 (with-temp-buffer 488 (with-temp-buffer
489 (setq buf2 (current-buffer)) 489 (setq buf2 (current-buffer))
490 (setq data-tests-lvar 1) 490 (setq data-tests-lvar 1)
@@ -501,7 +501,7 @@ comparing the subr with a much slower lisp implementation."
501 (kill-all-local-variables) 501 (kill-all-local-variables)
502 (should-have-watch-data `(data-tests-lvar nil makunbound ,buf2))) 502 (should-have-watch-data `(data-tests-lvar nil makunbound ,buf2)))
503 (setq-default data-tests-lvar 4) 503 (setq-default data-tests-lvar 4)
504 (should-have-watch-data `(data-tests-lvar 4 set nil)) 504 (should-have-watch-data '(data-tests-lvar 4 set nil))
505 (makunbound 'data-tests-lvar) 505 (makunbound 'data-tests-lvar)
506 (should-have-watch-data '(data-tests-lvar nil makunbound nil)) 506 (should-have-watch-data '(data-tests-lvar nil makunbound nil))
507 (setq data-tests-lvar 5) 507 (setq data-tests-lvar 5)
diff --git a/test/src/json-tests.el b/test/src/json-tests.el
index bffee8f39d3..651b0a0bb7a 100644
--- a/test/src/json-tests.el
+++ b/test/src/json-tests.el
@@ -86,8 +86,8 @@
86 (should (equal 86 (should (equal
87 (json-serialize 87 (json-serialize
88 (list :detect-hash-table #s(hash-table test equal data ("bla" "ble")) 88 (list :detect-hash-table #s(hash-table test equal data ("bla" "ble"))
89 :detect-alist `((bla . "ble")) 89 :detect-alist '((bla . "ble"))
90 :detect-plist `(:bla "ble"))) 90 :detect-plist '(:bla "ble")))
91 "\ 91 "\
92{\ 92{\
93\"detect-hash-table\":{\"bla\":\"ble\"},\ 93\"detect-hash-table\":{\"bla\":\"ble\"},\