summaryrefslogtreecommitdiff
path: root/test/lisp/simple-tests.el
diff options
context:
space:
mode:
authorYuan Fu <casouri@gmail.com>2021-03-12 12:18:22 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2021-03-12 14:03:00 -0500
commit75705b302dd025dc2d678124aa1b7bd52a8d35b2 (patch)
tree069fb72cbee3431961d9c79dc7e09fc51bb28e9b /test/lisp/simple-tests.el
parent6d024ae867ced056f9ca1206f178720ba5390213 (diff)
downloademacs-75705b302dd025dc2d678124aa1b7bd52a8d35b2.tar.gz
emacs-75705b302dd025dc2d678124aa1b7bd52a8d35b2.tar.bz2
emacs-75705b302dd025dc2d678124aa1b7bd52a8d35b2.zip
Fix simple-tests--undo*
* test/lisp/simple-tests.el (simple-tests--undo-in-region, simple-tests--undo-equiv-table): Re-enable in batch mode. Enable 'transient-mark-mode' in temp buffer.
Diffstat (limited to 'test/lisp/simple-tests.el')
-rw-r--r--test/lisp/simple-tests.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/test/lisp/simple-tests.el b/test/lisp/simple-tests.el
index 8fa8295765b..601eca6cd49 100644
--- a/test/lisp/simple-tests.el
+++ b/test/lisp/simple-tests.el
@@ -469,8 +469,11 @@ See bug#35036."
(ert-deftest simple-tests--undo-in-region ()
;; Test undo/redo in region.
- (skip-unless (not noninteractive))
(with-temp-buffer
+ ;; Enable `transient-mark-mode' so `region-active-p' works as
+ ;; expected. `region-active-p' is used to determine whether to
+ ;; perform regional undo in `undo'.
+ (transient-mark-mode)
(buffer-enable-undo)
(dolist (x '("a" "b" "c" "d" "e"))
(insert x)
@@ -506,9 +509,9 @@ See bug#35036."
lst)
(ert-deftest simple-tests--undo-equiv-table ()
- (skip-unless (not noninteractive))
(with-temp-buffer
(buffer-enable-undo)
+ (transient-mark-mode)
(let ((ul-hash-table (make-hash-table :test #'equal)))
(dolist (x '("a" "b" "c"))
(insert x)