equal
deleted
inserted
replaced
429 isVisualStartable |
429 isVisualStartable |
430 "return true, if this application can be started via #open. |
430 "return true, if this application can be started via #open. |
431 (to allow start of a change browser via double-click in the browser)" |
431 (to allow start of a change browser via double-click in the browser)" |
432 |
432 |
433 (self == ApplicationModel) ifTrue:[^ false "I am abstract"]. |
433 (self == ApplicationModel) ifTrue:[^ false "I am abstract"]. |
434 ((self respondsTo:#open) or:[self class implements:#openInterface]) ifFalse:[^ false]. |
434 ((self respondsTo:#open) or:[self class includesSelector:#openInterface]) ifFalse:[^ false]. |
435 "/ (self respondsTo:#windowSpec) ifFalse:[^ false]. |
435 "/ (self respondsTo:#windowSpec) ifFalse:[^ false]. |
436 ^ true |
436 ^ true |
437 |
437 |
438 "Created: / 27.10.1997 / 16:38:02 / cg" |
438 "Created: / 27.10.1997 / 16:38:02 / cg" |
439 "Modified: / 14.3.1998 / 16:30:50 / cg" |
439 "Modified: / 14.3.1998 / 16:30:50 / cg" |
2589 ! ! |
2589 ! ! |
2590 |
2590 |
2591 !ApplicationModel class methodsFor:'documentation'! |
2591 !ApplicationModel class methodsFor:'documentation'! |
2592 |
2592 |
2593 version |
2593 version |
2594 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.165 2001-12-12 10:39:19 cg Exp $' |
2594 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.166 2002-02-25 20:06:00 cg Exp $' |
2595 ! ! |
2595 ! ! |
2596 ApplicationModel initialize! |
2596 ApplicationModel initialize! |