diff --git a/tools/test-upgrade.lisp b/tools/test-upgrade.lisp index 6fd5ba03ab3f9ba29fa94cca2613361fe257873e..61c1cf8743148b39ffd5aa682913aab2bc882bca 100644 --- a/tools/test-upgrade.lisp +++ b/tools/test-upgrade.lisp @@ -60,7 +60,7 @@ Use at a given tag, put it under build/asdf-${tag}.lisp" (git `(show (,tag ":asdf.lisp") (> ,file)))) (t (ensure-directories-exist (pn "build/old/build/")) - (run `(pipe (git archive ,tag) (tar "xfC" - (pn "build/old/")))) + (run `(pipe (git archive ,tag) (tar "xfC" - ,(pn "build/old/")))) (run `(make) :directory (pn "build/old/")) (rename-file-overwriting-target (pn "build/old/build/asdf.lisp") file))))))))