diff --git a/collects/mzlib/port.ss b/collects/mzlib/port.ss
index df1cd9bf8a..56b12030af 100644
--- a/collects/mzlib/port.ss
+++ b/collects/mzlib/port.ss
@@ -2,7 +2,7 @@
 
 (require (for-syntax scheme/base)
          mzlib/etc
-         scheme/contract
+         scheme/contract/base
          mzlib/list
          "private/port.ss")
 
diff --git a/collects/mzlib/private/contract-define.ss b/collects/mzlib/private/contract-define.ss
index cf76531378..4cece1f07b 100644
--- a/collects/mzlib/private/contract-define.ss
+++ b/collects/mzlib/private/contract-define.ss
@@ -5,7 +5,7 @@
 (require (for-syntax scheme/base
                      unstable/srcloc
                      (prefix-in a: scheme/contract/private/helpers))
-         (only-in scheme/contract contract))
+         (only-in scheme/contract/private/base contract))
 
 ;; First, we have the old define/contract implementation, which
 ;; is still used in mzlib/contract.
diff --git a/collects/scheme/unit.ss b/collects/scheme/unit.ss
index 6909a99c8b..e0d706406b 100644
--- a/collects/scheme/unit.ss
+++ b/collects/scheme/unit.ss
@@ -1,7 +1,7 @@
 
 (module unit scheme/base
   (require mzlib/unit
-           scheme/contract
+           scheme/contract/base
            (for-syntax scheme/base
                        syntax/struct))
   (provide (except-out (all-from-out mzlib/unit)
diff --git a/collects/syntax/id-table.ss b/collects/syntax/id-table.ss
index 1c7ddc5778..0e1f89972e 100644
--- a/collects/syntax/id-table.ss
+++ b/collects/syntax/id-table.ss
@@ -1,6 +1,6 @@
 #lang scheme/base
 (require (for-syntax scheme/base)
-         scheme/contract
+         scheme/contract/base
          scheme/dict
          "private/id-table.ss")
 #|
diff --git a/collects/syntax/keyword.ss b/collects/syntax/keyword.ss
index b28c209378..f3dfcffbf3 100644
--- a/collects/syntax/keyword.ss
+++ b/collects/syntax/keyword.ss
@@ -1,5 +1,5 @@
 #lang scheme/base
-(require scheme/contract
+(require scheme/contract/base
          scheme/dict
          "private/keyword.ss")
 
diff --git a/collects/syntax/modcollapse.ss b/collects/syntax/modcollapse.ss
index a673d2d324..9a94d274cd 100644
--- a/collects/syntax/modcollapse.ss
+++ b/collects/syntax/modcollapse.ss
@@ -1,6 +1,6 @@
 #lang scheme/base
 
-(require scheme/contract
+(require scheme/contract/base
          "private/modcollapse-noctc.ss")
 
 (define simple-rel-to-module-path-v/c
diff --git a/collects/syntax/modresolve.ss b/collects/syntax/modresolve.ss
index fe5972a000..e6a4dba735 100644
--- a/collects/syntax/modresolve.ss
+++ b/collects/syntax/modresolve.ss
@@ -1,6 +1,6 @@
 
 #lang scheme/base
-(require scheme/contract
+(require scheme/contract/base
          "private/modhelp.ss")
 
 (define (force-relto relto dir?)