diff --git a/collects/tests/typed-scheme/succeed/values-dots.ss b/collects/tests/typed-scheme/succeed/values-dots.ss
index 18be39f3..25cf3496 100644
--- a/collects/tests/typed-scheme/succeed/values-dots.ss
+++ b/collects/tests/typed-scheme/succeed/values-dots.ss
@@ -1,6 +1,6 @@
 #lang typed-scheme
 
-(require "private/extra-procs.ss")
+(require typed-scheme/private/extra-procs)
 
 
 (call-with-values (lambda () (values 1 2)) (lambda: ([x : Number] [y : Number]) (+ x y)))