equal
deleted
inserted
replaced
2902 |
2902 |
2903 ^ (win := self window) notNil and:[win isOpen] |
2903 ^ (win := self window) notNil and:[win isOpen] |
2904 ! |
2904 ! |
2905 |
2905 |
2906 isWebService |
2906 isWebService |
2907 ^ false |
2907 ^ device notNil and:[ device askFor:#isWebServiceDevice ] |
2908 ! |
2908 ! |
2909 |
2909 |
2910 processName |
2910 processName |
2911 "return a name to be shown for me in the process monitor" |
2911 "return a name to be shown for me in the process monitor" |
2912 |
2912 |
3385 ! ! |
3385 ! ! |
3386 |
3386 |
3387 !ApplicationModel class methodsFor:'documentation'! |
3387 !ApplicationModel class methodsFor:'documentation'! |
3388 |
3388 |
3389 version |
3389 version |
3390 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.263 2008-10-11 15:40:33 cg Exp $' |
3390 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.264 2008-10-11 15:49:32 cg Exp $' |
3391 ! ! |
3391 ! ! |
3392 |
3392 |
3393 ApplicationModel initialize! |
3393 ApplicationModel initialize! |