emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 75705b3: Fix simple-tests--undo*


From: Stefan Monnier
Subject: master 75705b3: Fix simple-tests--undo*
Date: Fri, 12 Mar 2021 14:09:04 -0500 (EST)

branch: master
commit 75705b302dd025dc2d678124aa1b7bd52a8d35b2
Author: Yuan Fu <casouri@gmail.com>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    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.
---
 test/lisp/simple-tests.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/test/lisp/simple-tests.el b/test/lisp/simple-tests.el
index 8fa8295..601eca6 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]