diff --git a/collects/preprocessor/mzpp.ss b/collects/preprocessor/mzpp.ss
index 0d36fc840d..5e3af4711d 100644
--- a/collects/preprocessor/mzpp.ss
+++ b/collects/preprocessor/mzpp.ss
@@ -167,10 +167,12 @@
                  [cd (cd)])
     (run files)))
 
+(define-namespace-anchor nsa)
+
 (provide preprocess)
 (define (preprocess . files)
   (read-case-sensitive #t)
-  (namespace-require 'preprocessor/mzpp)
+  (current-namespace (namespace-anchor->namespace nsa))
   (do-evals)
   (run files))
 
diff --git a/collects/preprocessor/mztext.ss b/collects/preprocessor/mztext.ss
index 4dc7aa05f0..d84110229b 100644
--- a/collects/preprocessor/mztext.ss
+++ b/collects/preprocessor/mztext.ss
@@ -305,10 +305,12 @@
 ;;=============================================================================
 ;; Invocation
 
+(define-namespace-anchor nsa)
+
 (define (initialize)
   (read-case-sensitive #t)
   (unless (command-marker) (command-marker "@"))
-  (namespace-require 'preprocessor/mztext)
+  (current-namespace (namespace-anchor->namespace nsa))
   (do-evals))
 
 (define (run)