mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-11 09:20:51 +00:00
Try to fix vc-test-git06-version-diff on Hydra
* 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.
This commit is contained in:
parent
dd4be8ad3b
commit
80d318aabb
@ -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))
|
||||
))))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user