diff --git a/test/test-symlink-loop.script b/test/test-symlink-loop.script
index f353baff95a82fa842c83fc1c3ec0d1ce5c3874b..6e12859dadcddc00478323f6cc4c426823ea80ec 100644
--- a/test/test-symlink-loop.script
+++ b/test/test-symlink-loop.script
@@ -33,7 +33,7 @@
                        (let ((asds nil))
                          (declare (special asds))
                          (asdf/source-registry:collect-sub*directories-asd-files
-                          "/Users/rpg/Downloads/asdf-loop\ 2/"
+                          scratch-dir
                           :collect
                           #'(lambda (asd)
                               (let* ((name (pathname-name asd))