--- a/ExternalTopView.st	Fri Jan 22 17:59:44 1999 +0100
+++ b/ExternalTopView.st	Sat Jan 23 13:23:58 1999 +0100
@@ -76,6 +76,16 @@
     realized := shown := true.
 ! !
 
+!ExternalTopView methodsFor:'queries'!
+
+isExternalTopView
+    ^ true
+!
+
+isExternalWindow
+    ^ true
+! !
+
 !ExternalTopView methodsFor:'redefined'!
 
 destroyView
@@ -101,5 +111,5 @@
 !ExternalTopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ExternalTopView.st,v 1.3 1999-01-22 16:59:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ExternalTopView.st,v 1.4 1999-01-23 12:23:58 cg Exp $'
 ! !