diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/lread-tests.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/test/src/lread-tests.el b/test/src/lread-tests.el index 693c6c09bf3..daf53438811 100644 --- a/test/src/lread-tests.el +++ b/test/src/lread-tests.el | |||
| @@ -183,8 +183,7 @@ literals (Bug#20852)." | |||
| 183 | 183 | ||
| 184 | (ert-deftest lread-tests--force-new-style-backquotes () | 184 | (ert-deftest lread-tests--force-new-style-backquotes () |
| 185 | (let ((data (should-error (read "(` (a b))")))) | 185 | (let ((data (should-error (read "(` (a b))")))) |
| 186 | (should (equal (cdr data) | 186 | (should (equal (cdr data) '("Old-style backquotes detected!")))) |
| 187 | '("Loading `nil': old-style backquotes detected!")))) | ||
| 188 | (should (equal (let ((force-new-style-backquotes t)) | 187 | (should (equal (let ((force-new-style-backquotes t)) |
| 189 | (read "(` (a b))")) | 188 | (read "(` (a b))")) |
| 190 | '(`(a b))))) | 189 | '(`(a b))))) |