...
original commit: 6c60128ef21b0ed29b105ce5e06354f30607293c
This commit is contained in:
parent
0065eb43c5
commit
716c62ae54
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue
Block a user