--- a/Smalltalk.st	Fri Aug 04 18:15:24 2006 +0200
+++ b/Smalltalk.st	Mon Aug 07 12:57:17 2006 +0200
@@ -591,7 +591,6 @@
     Stdout reOpen. Stderr reOpen. Stdin reOpen.
 ! !
 
-
 !Smalltalk class methodsFor:'Compatibility-Squeak'!
 
 beep
@@ -2186,8 +2185,10 @@
                     "this does an implicit autoload if required"
                     namespace := namespace privateClassesAt:prefix.
                 ] ifFalse:[
-                    cls := namespace privateClassesAt:rest.
-                    cls isBehavior ifTrue:[^ cls].
+                    namespace isLoaded ifTrue:[
+                        cls := namespace privateClassesAt:rest.
+                        cls isBehavior ifTrue:[^ cls].
+                    ].
                     namespace := nil.   "force exit of loop"
                 ].
             ].
@@ -2209,9 +2210,9 @@
      Smalltalk classNamed:'Array class'
     "
 
-    "Created: 24.11.1995 / 17:30:22 / cg"
-    "Modified: 24.11.1995 / 17:31:29 / cg"
-    "Modified: 19.6.1996 / 14:22:21 / stefan"
+    "Created: / 24-11-1995 / 17:30:22 / cg"
+    "Modified: / 19-06-1996 / 14:22:21 / stefan"
+    "Modified: / 03-08-2006 / 14:01:06 / cg"
 !
 
 classNames
@@ -6727,14 +6728,14 @@
      ST/X revision Naming is:
         <major>.<minor>.<revision>.<release>"
 
-    ^ 8
+    ^ 9
 
     " 
      Smalltalk revisionNr
      Smalltalk hello        
     "
 
-    "Modified: / 19.6.1998 / 04:29:10 / cg"
+    "Modified: / 07-08-2006 / 12:57:12 / cg"
 !
 
 timeStamp
@@ -6818,5 +6819,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.727 2006-06-15 17:08:28 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.728 2006-08-07 10:57:17 cg Exp $'
 ! !