--- a/Class.st	Tue Oct 28 20:43:20 1997 +0100
+++ b/Class.st	Tue Oct 28 21:06:50 1997 +0100
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.2.1 on 20-oct-1997 at 9:54:40 pm'                  !
-
 ClassDescription subclass:#Class
 	instanceVariableNames:'name category classvars comment subclasses classFilename package
 		revision primitiveSpec environment signature hook'
@@ -448,6 +446,15 @@
 
     "Created: 20.6.1997 / 17:18:14 / cg"
     "Modified: 20.6.1997 / 17:18:26 / cg"
+!
+
+isVisualStartable
+    "return true, if this is an application class,
+     which can be started via #open"
+
+    ^ false
+
+    "Created: / 27.10.1997 / 16:42:05 / cg"
 ! !
 
 !Class methodsFor:'accessing'!
@@ -3866,5 +3873,5 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.296 1997-10-21 17:41:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.297 1997-10-28 20:06:50 cg Exp $'
 ! !