Fix #positionOffset to show 'senders' box with cursor on ok-button.
authorStefan Vogel <sv@exept.de>
Fri, 03 Jan 1997 11:10:07 +0100
changeset 912 310c4970e613
parent 911 22a930d19a9b
child 913 d3318d34a1d0
Fix #positionOffset to show 'senders' box with cursor on ok-button.
DialogBox.st
--- a/DialogBox.st	Fri Jan 03 03:23:33 1997 +0100
+++ b/DialogBox.st	Fri Jan 03 11:10:07 1997 +0100
@@ -5105,10 +5105,14 @@
      okButton appear under the cursor"
 
     okButton isNil ifTrue:[
-	^ super positionOffset
+        ^ super positionOffset
     ].
     buttonPanel setChildPositionsIfChanged.
+    self resize.
+    buttonPanel pixelOrigin:buttonPanel computeOrigin.
     ^ (okButton originRelativeTo:self) + (okButton extent // 2)
+
+    "Modified: 3.1.1997 / 10:07:35 / stefan"
 !
 
 preferredExtent 
@@ -5265,6 +5269,6 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.94 1996-11-14 23:40:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.95 1997-01-03 10:10:07 stefan Exp $'
 ! !
 DialogBox initialize!