summaryrefslogtreecommitdiff
path: root/test/lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-05-05 16:38:39 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-05-05 16:38:39 +0200
commitd01e74f46d07c32c9faf5462dfc725cb01ad77d7 (patch)
tree87c0689fd07ada59c98d319f61199f8e1bba1942 /test/lisp
parent6dbbdff281775eb82133fd13edc2ff6b63a97a58 (diff)
downloademacs-d01e74f46d07c32c9faf5462dfc725cb01ad77d7.tar.gz
emacs-d01e74f46d07c32c9faf5462dfc725cb01ad77d7.tar.bz2
emacs-d01e74f46d07c32c9faf5462dfc725cb01ad77d7.zip
Fix a mistaken test case in test-undo-region
* test/lisp/simple-tests.el (test-undo-region): Fix failing cases (bug#21523) -- the crossing-region case shouldn't be included, either.
Diffstat (limited to 'test/lisp')
-rw-r--r--test/lisp/simple-tests.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/simple-tests.el b/test/lisp/simple-tests.el
index 6350bebeeea..dcab811bb5a 100644
--- a/test/lisp/simple-tests.el
+++ b/test/lisp/simple-tests.el
@@ -966,8 +966,8 @@ See Bug#21722."
(setq buffer-undo-list nil)
(downcase-word 1)
(should (= (length (delq nil (undo-make-selective-list 1 9))) 2))
- (should (= (length (delq nil (undo-make-selective-list 4 9))) 1))
- ;; FIXME this is the off-by-one error case.
+ ;; FIXME: These should give 0, but currently give 1.
+ ;;(should (= (length (delq nil (undo-make-selective-list 4 9))) 0))
;;(should (= (length (delq nil (undo-make-selective-list 5 9))) 0))
(should (= (length (delq nil (undo-make-selective-list 6 9))) 0))))