summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/lisp-tests.el
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2020-09-26 15:31:50 +0200
committerAndrea Corallo <akrl@sdf.org>2020-09-26 15:31:50 +0200
commit06acf681d6fd8e2c5c6a9584b5df6b98eccda20b (patch)
tree5cc7132156db6b77599a86072de21a036828bcf4 /test/lisp/emacs-lisp/lisp-tests.el
parente5b052d60d905209c6cefcf18c620167ed946301 (diff)
parente00936bf9f10cf44e1df71a7a11afd770e8a122a (diff)
downloademacs-06acf681d6fd8e2c5c6a9584b5df6b98eccda20b.tar.gz
emacs-06acf681d6fd8e2c5c6a9584b5df6b98eccda20b.tar.bz2
emacs-06acf681d6fd8e2c5c6a9584b5df6b98eccda20b.zip
Merge remote-tracking branch 'savannah/master' into HEAD
Diffstat (limited to 'test/lisp/emacs-lisp/lisp-tests.el')
-rw-r--r--test/lisp/emacs-lisp/lisp-tests.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/test/lisp/emacs-lisp/lisp-tests.el b/test/lisp/emacs-lisp/lisp-tests.el
index a2b8304c96a..437b907ba13 100644
--- a/test/lisp/emacs-lisp/lisp-tests.el
+++ b/test/lisp/emacs-lisp/lisp-tests.el
@@ -136,8 +136,7 @@
(text-mode)
(insert "\"foo\"")
(goto-char (point-min))
- (delete-pair)
- (should (string-equal "fo\"" (buffer-string)))))
+ (should-error (delete-pair))))
(ert-deftest lisp-delete-pair-quotes-text-mode-syntax-table ()
"Test \\[delete-pair] with modified Text Mode syntax for #15014."
@@ -296,7 +295,7 @@
(lambda () (up-list 1 t t))
(or "(1 '2 ( 2' 1 '2 ) 2' 1)")
;; abcdefghijklmnopqrstuvwxy
- i k x scan-error)
+ i k x user-error)
(define-lisp-up-list-test backward-up-list-basic
(lambda () (backward-up-list))