summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-08-29 21:56:22 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2021-08-29 21:56:22 +0200
commit7c7d58f45463edf13f97f6b2496c5edc901ede45 (patch)
treeeb5113aa0a69b9353ce130eaf2f70f94ce03a5eb
parent5bd23b0cd36bc1ea47313db15765fe0a1e6ea717 (diff)
downloademacs-7c7d58f45463edf13f97f6b2496c5edc901ede45.tar.gz
emacs-7c7d58f45463edf13f97f6b2496c5edc901ede45.tar.bz2
emacs-7c7d58f45463edf13f97f6b2496c5edc901ede45.zip
Fix vc test for RCS
* test/lisp/vc/vc-tests.el (vc-test--rename-file): Fix test for RCS.
-rw-r--r--test/lisp/vc/vc-tests.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/test/lisp/vc/vc-tests.el b/test/lisp/vc/vc-tests.el
index dbb8a9e3d12..f2807a3f063 100644
--- a/test/lisp/vc/vc-tests.el
+++ b/test/lisp/vc/vc-tests.el
@@ -588,7 +588,10 @@ This checks also `vc-backend' and `vc-responsible-backend'."
(should (not (file-exists-p tmp-name)))
(should (file-exists-p new-name))
- (should (equal (vc-state new-name) 'added))))
+ (should (equal (vc-state new-name)
+ (if (eq backend 'RCS)
+ 'up-to-date
+ 'added)))))
;; Save exit.
(ignore-errors