From 76300b87d472354507a872fa84709df9d5d4a59b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 4 Sep 2021 18:39:20 -0700 Subject: [PATCH] * test/lisp/vc/vc-tests.el (vc-test-sccs06-version-diff): Fix it. --- test/lisp/vc/vc-tests.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/lisp/vc/vc-tests.el b/test/lisp/vc/vc-tests.el index 39a68275a03..16ef5cc2f9c 100644 --- a/test/lisp/vc/vc-tests.el +++ b/test/lisp/vc/vc-tests.el @@ -640,7 +640,7 @@ This checks also `vc-backend' and `vc-responsible-backend'." (with-current-buffer buff (progn ;; Optionally checkout file. - (when (or (eq backend 'RCS) (eq backend 'CVS)) + (when (memq backend '(RCS CVS SCCS)) (vc-checkout tmp-name)) ;; Checkin file. @@ -649,7 +649,7 @@ This checks also `vc-backend' and `vc-responsible-backend'." (log-edit-done)))) ;; Modify file content. - (when (or (eq backend 'RCS) (eq backend 'CVS)) + (when (memq backend '(RCS CVS SCCS)) (vc-checkout tmp-name)) (write-region "updatedtext" nil tmp-name nil 'nomessage) -- 2.39.2