--- a/WSensor.st	Fri Jan 22 18:47:03 1999 +0100
+++ b/WSensor.st	Sat Jan 23 13:23:11 1999 +0100
@@ -896,7 +896,14 @@
         "/ Without the return below, we need a flushConfigureEvents entry here,
         "/ to be invoked whenever a subview is resized / repositioned.
 
-        ^ self
+        "/ A kludge-workaround had to be added to children of
+        "/ external top views - since the external view does not get any
+        "/ events delivered, we must react upon changes of the
+        "/ child. (sigh).
+        aView superView isExternalTopView ifFalse:[
+"/            'ignored configure for: ' print. aView class printCR.
+            ^ self
+        ]
     ].
 
     "/
@@ -2657,6 +2664,6 @@
 !WindowSensor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WSensor.st,v 1.136 1999-01-10 17:03:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WSensor.st,v 1.137 1999-01-23 12:23:11 cg Exp $'
 ! !
 WindowSensor initialize!

--- a/WindowSensor.st	Fri Jan 22 18:47:03 1999 +0100
+++ b/WindowSensor.st	Sat Jan 23 13:23:11 1999 +0100
@@ -896,7 +896,14 @@
         "/ Without the return below, we need a flushConfigureEvents entry here,
         "/ to be invoked whenever a subview is resized / repositioned.
 
-        ^ self
+        "/ A kludge-workaround had to be added to children of
+        "/ external top views - since the external view does not get any
+        "/ events delivered, we must react upon changes of the
+        "/ child. (sigh).
+        aView superView isExternalTopView ifFalse:[
+"/            'ignored configure for: ' print. aView class printCR.
+            ^ self
+        ]
     ].
 
     "/
@@ -2657,6 +2664,6 @@
 !WindowSensor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowSensor.st,v 1.136 1999-01-10 17:03:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowSensor.st,v 1.137 1999-01-23 12:23:11 cg Exp $'
 ! !
 WindowSensor initialize!