original commit: 6c60128ef21b0ed29b105ce5e06354f30607293c
This commit is contained in:
Robby Findler 1999-03-26 15:14:18 +00:00
parent 0065eb43c5
commit 716c62ae54

View File

@ -588,7 +588,8 @@
[cancel-callback (lambda args
(hide-dialog)
(-read))]
[cancel-button (make-object button% "Cancel" bottom-panel cancel-callback)])
[cancel-button (make-object button% "Cancel" bottom-panel cancel-callback)]
[grow-box-space (make-object grow-box-spacer-pane% bottom-panel)])
(send ok-button min-width (send cancel-button get-width))
(send* bottom-panel
(stretchable-height #f)