--- a/Class.st	Wed Nov 06 23:18:25 1996 +0100
+++ b/Class.st	Thu Nov 07 12:57:46 1996 +0100
@@ -15,7 +15,8 @@
 	classVariableNames:'UpdatingChanges LockChangesFile FileOutErrorSignal
 		CatchMethodRedefinitions MethodRedefinitionSignal
 		UpdateChangeFileQuerySignal TryLocalSourceFirst
-		ChangeFileAccessLock NameSpaceQuerySignal PackageQuerySignal'
+		ChangeFileAccessLock NameSpaceQuerySignal PackageQuerySignal
+		CreateNameSpaceQuerySignal'
 	poolDictionaries:''
 	category:'Kernel-Classes'
 !
@@ -149,6 +150,11 @@
         NameSpaceQuerySignal notifierString:'asking for nameSpace'.
         NameSpaceQuerySignal handlerBlock:[:ex | ex proceedWith:Smalltalk currentNameSpace].
 
+        CreateNameSpaceQuerySignal := QuerySignal new mayProceed:true.
+        CreateNameSpaceQuerySignal nameClass:self message:#createNameSpaceQuerySignal.
+        CreateNameSpaceQuerySignal notifierString:'asking for nameSpace creation'.
+        CreateNameSpaceQuerySignal handlerBlock:[:ex | ex proceedWith:false].
+
         PackageQuerySignal := QuerySignal new mayProceed:true.
         PackageQuerySignal nameClass:self message:#packageQuerySignal.
         PackageQuerySignal notifierString:'asking for package'.
@@ -162,11 +168,21 @@
         ChangeFileAccessLock := Semaphore forMutualExclusion.
     ]
 
-    "Modified: 5.11.1996 / 20:08:12 / cg"
+    "Modified: 7.11.1996 / 12:55:32 / cg"
 ! !
 
 !Class class methodsFor:'Signal constants'!
 
+createNameSpaceQuerySignal
+    "return the signal used as an upQuery if a new nameSpace should be
+     silently created without user confirmation.
+     Only used when installing autoloaded classes"
+
+    ^ CreateNameSpaceQuerySignal
+
+    "Created: 7.11.1996 / 12:55:01 / cg"
+!
+
 fileOutErrorSignal
     "return the signal raised when an error occurs while fileing out.
      This is signalled to allow browsers some user feed back in case
@@ -4292,6 +4308,6 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.205 1996-11-06 20:51:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.206 1996-11-07 11:57:46 cg Exp $'
 ! !
 Class initialize!