diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-29 21:56:22 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-29 21:56:22 +0200 |
commit | 7c7d58f45463edf13f97f6b2496c5edc901ede45 (patch) | |
tree | eb5113aa0a69b9353ce130eaf2f70f94ce03a5eb | |
parent | 5bd23b0cd36bc1ea47313db15765fe0a1e6ea717 (diff) | |
download | emacs-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.el | 5 |
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 |