From: Stefan Kangas <stefankangas@gmail.com>
Date: Sun, 2 Mar 2025 18:45:53 +0000 (+0100)
Subject: ; Fix thinko
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=662292a8a2cf0bb7055d540667d2cdbb43aefbb2;p=emacs.git

; Fix thinko

(cherry picked from commit 83e2e5e24b72f7a271c04a0ce9cad1399fb2a0f9)
---

diff --git a/test/lisp/vc/vc-tests.el b/test/lisp/vc/vc-tests.el
index 49a6f2c38f5..f13a200cd99 100644
--- a/test/lisp/vc/vc-tests.el
+++ b/test/lisp/vc/vc-tests.el
@@ -179,9 +179,9 @@ For backends which don't support it, it is emulated."
 
 (defmacro vc--fix-home-for-bzr (tempdir)
   ;; See the comment in `vc-bzr-test-bug9726'.
-  '(when (eq backend 'Bzr)
-     (push (format "BZR_HOME=%s" tempdir) process-environment)
-     (push (format "HOME=%s" tempdir) process-environment)))
+  `(when (eq backend 'Bzr)
+     (push (format "BZR_HOME=%s" ,tempdir) process-environment)
+     (push (format "HOME=%s" ,tempdir) process-environment)))
 
 (defun vc-test--create-repo (backend)
   "Create a test repository in `default-directory', a temporary directory."