--- a/ApplicationModel.st	Fri Mar 13 22:26:19 1998 +0100
+++ b/ApplicationModel.st	Sat Mar 14 16:31:18 1998 +0100
@@ -389,12 +389,12 @@
     "return true, if this application can be started via #open"
 
     (self == ApplicationModel) ifTrue:[^ false "I am abstract"].
-    (self respondsTo:#windowSpec) ifFalse:[^ false].
-    (self respondsTo:#open) ifFalse:[^ false].
+    ((self respondsTo:#open) or:[self class implements:#openInterface]) ifFalse:[^ false].
+"/    (self respondsTo:#windowSpec) ifFalse:[^ false].
     ^ true
 
     "Created: / 27.10.1997 / 16:38:02 / cg"
-    "Modified: / 27.10.1997 / 16:46:08 / cg"
+    "Modified: / 14.3.1998 / 16:30:50 / cg"
 ! !
 
 !ApplicationModel class methodsFor:'resources'!
@@ -1622,6 +1622,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.73 1998-02-26 18:18:27 dq Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.74 1998-03-14 15:31:18 cg Exp $'
 ! !
 ApplicationModel initialize!