diff --git a/pcl/pclload.lisp b/pcl/pclload.lisp
index 39fb098d686c130c8b2ecee745510a2fe97c4151..a4d434397e93eb44a78289b94acb007100811676 100644
--- a/pcl/pclload.lisp
+++ b/pcl/pclload.lisp
@@ -1,6 +1,6 @@
 (in-package "PCL")
 (unless (find-package "SLOT-ACCESSOR-NAME")
-  (make-package "SLOT-ACCESSOR-NAME"))
+  (make-package "SLOT-ACCESSOR-NAME" :use nil))
 (rename-package "PCL" "PCL" '("OLD-PCL"))
 (rename-package "SLOT-ACCESSOR-NAME" "SLOT-ACCESSOR-NAME"
 		'("OLD-SLOT-ACCESSOR-NAME"))