From 4da3a62390704160b40b478d109e39615c9466d1 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Tue, 7 Apr 2015 09:48:59 -0400
Subject: [PATCH] Fix upgrade-lisps magic parameter for deftestcmd.

---
 tools/test-environment.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tools/test-environment.lisp b/tools/test-environment.lisp
index 734a689c..ed866f9d 100644
--- a/tools/test-environment.lisp
+++ b/tools/test-environment.lisp
@@ -114,8 +114,8 @@
            (setf lisp (get-lisp lisp)))
           (lisps ((lisps *test-lisps*))
            (setf lisps (get-lisps lisps)))
-          (upgrade-lisps ((lisps *upgrade-test-lisps*))
-           (setf upgrade-lisps (get-upgrade-lisps lisps)))
+          (upgrade-lisps ((upgrade-lisps *upgrade-test-lisps*))
+           (setf upgrade-lisps (get-upgrade-lisps upgrade-lisps)))
           (systems ((systems *test-systems*)))
           (test-scripts ((test-scripts *test-scripts*))
            (setf test-scripts (get-test-scripts test-scripts)))
-- 
GitLab