--- a/ExternalTopView.st Mon Feb 15 18:43:27 1999 +0100
+++ b/ExternalTopView.st Mon Feb 15 18:46:53 1999 +0100
@@ -81,10 +81,8 @@
!ExternalTopView methodsFor:'queries'!
isExternalTopView
- ^ true
-!
+ "return true, if this is an external topView - always true here"
-isExternalWindow
^ true
! !
@@ -99,12 +97,18 @@
!
open
+ "redefined to start a watch timeout for closed windows;
+ this is required, since we wont get any closeRequest event for
+ external windows (as all of its events are handled by the alien
+ application)"
+
super open.
self checkWindowStillAlive
!
unmap
- "never unmapped by ST/X - instead, the view is under
+ "redefined as a noop;
+ ExternalTopViews are never unmapped by ST/X - instead, the view is under
control of the host application ..."
@@ -113,5 +117,5 @@
!ExternalTopView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/ExternalTopView.st,v 1.5 1999-02-15 17:43:27 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ExternalTopView.st,v 1.6 1999-02-15 17:46:53 cg Exp $'
! !