diff --git a/tools/setup.lisp b/tools/setup.lisp
index d828284db9a72f9cedd275a8f56c7e9281e0e75d..826778f234f2d9bab66def88461dbadeb4919dca 100644
--- a/tools/setup.lisp
+++ b/tools/setup.lisp
@@ -3,7 +3,7 @@
 ;;; **********************************************************************
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/setup.lisp,v 1.39 2004/06/01 23:36:07 cwang Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/setup.lisp,v 1.40 2004/07/25 18:25:16 pmai Rel $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -23,6 +23,7 @@
 ;; enabled upon startup from the function PACKAGE-LOCKS-INIT.
 (in-package "LISP")
 (defparameter *enable-package-locked-errors* nil)
+(ext:unlock-all-packages)
 
 (define-condition genesis-c-header-file-changed (warning)
   ((name :initarg :name :reader genesis-c-header-file-name))