diff --git a/collects/tests/mzscheme/uni-norm.ss b/collects/tests/mzscheme/uni-norm.ss
index 52b1dc05a5..e97848d6ef 100644
--- a/collects/tests/mzscheme/uni-norm.ss
+++ b/collects/tests/mzscheme/uni-norm.ss
@@ -16,7 +16,7 @@
 
 (define (get-test-file)
   (define name "NormalizationTest.txt")
-  (define base "http://www.unicode.org/Public/UNIDATA/")
+  (define base "http://www.unicode.org/Public/4.1.0/ucd/")
   (define (existing)
     (let loop ([dirs (list (current-load-relative-directory)
                            (current-directory))])