aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/lisp/emacs-lisp/bytecomp-tests.el3
-rw-r--r--test/src/lread-tests.el2
2 files changed, 3 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/bytecomp-tests.el b/test/lisp/emacs-lisp/bytecomp-tests.el
index 3624904753c..84004a9264a 100644
--- a/test/lisp/emacs-lisp/bytecomp-tests.el
+++ b/test/lisp/emacs-lisp/bytecomp-tests.el
@@ -527,7 +527,8 @@ literals (Bug#20852)."
527 (err (should-error (byte-compile-file source)))) 527 (err (should-error (byte-compile-file source))))
528 (should (equal (cdr err) 528 (should (equal (cdr err)
529 (list (concat "unescaped character literals " 529 (list (concat "unescaped character literals "
530 "\", (, ), ;, [, ] detected!")))))))) 530 "`?\"', `?(', `?)', `?;', `?[', `?]' "
531 "detected!"))))))))
531 532
532;; Local Variables: 533;; Local Variables:
533;; no-byte-compile: t 534;; no-byte-compile: t
diff --git a/test/src/lread-tests.el b/test/src/lread-tests.el
index 0427fe64e4a..685ea682e29 100644
--- a/test/src/lread-tests.el
+++ b/test/src/lread-tests.el
@@ -140,7 +140,7 @@ literals (Bug#20852)."
140 (should (equal (lread-tests--last-message) 140 (should (equal (lread-tests--last-message)
141 (concat (format-message "Loading `%s': " file-name) 141 (concat (format-message "Loading `%s': " file-name)
142 "unescaped character literals " 142 "unescaped character literals "
143 "\", (, ), ;, [, ] detected!"))))) 143 "`?\"', `?(', `?)', `?;', `?[', `?]' detected!")))))
144 144
145(ert-deftest lread-test-bug26837 () 145(ert-deftest lread-test-bug26837 ()
146 "Test for http://debbugs.gnu.org/26837 ." 146 "Test for http://debbugs.gnu.org/26837 ."