# HG changeset patch # User Stefan Vogel # Date 852286207 -3600 # Node ID 310c4970e613373c23d2b5da7b944b1678326cbe # Parent 22a930d19a9b189f2720a67c9284f7dc44dd206c Fix #positionOffset to show 'senders' box with cursor on ok-button. diff -r 22a930d19a9b -r 310c4970e613 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!