]> git.eshelyaron.com Git - emacs.git/commitdiff
Try to fix vc-test-git06-version-diff on Hydra
authorDmitry Gutov <dgutov@yandex.ru>
Sun, 5 Sep 2021 23:32:46 +0000 (02:32 +0300)
committerDmitry Gutov <dgutov@yandex.ru>
Sun, 5 Sep 2021 23:32:46 +0000 (02:32 +0300)
* test/lisp/vc/vc-tests.el (vc-test--version-diff):
Fix Git backend when running in clean environment.
(vc-test-git06-version-diff): Unskip on Hydra.

test/lisp/vc/vc-tests.el

index c20d1bdf6a51619a94249fc2c2dbe18f583f32c2..4169a96670a5e3d34d4ebc12152fac8dbe7a4912 100644 (file)
@@ -615,10 +615,10 @@ This checks also `vc-backend' and `vc-responsible-backend'."
     (when (eq backend 'Bzr)
       (setq tempdir (make-temp-file "vc-test--version-diff" t)
             process-environment (cons (format "BZR_HOME=%s" tempdir)
-                                      (cons
-                                       "EMAIL=john@doe.ee"
-                                       process-environment))))
-
+                                      process-environment)))
+    (when (memq backend '(Bzr Git))
+      (setq process-environment (cons "EMAIL=john@doe.ee"
+                                      process-environment)))
     (unwind-protect
         (progn
           ;; Cleanup.
@@ -797,9 +797,6 @@ This checks also `vc-backend' and `vc-responsible-backend'."
              (ert-get-test
               ',(intern
                  (format "vc-test-%s01-register" backend-string))))))
-          ;; FIXME git (2.18.1) commit fails with status 128 - why?
-          (skip-unless (not (and (eq 'Git ',backend)
-                                 (getenv "EMACS_HYDRA_CI"))))
           (vc-test--version-diff ',backend))
         ))))